Henrywood and Agarwal, Equation (12)

Time bar (total: 20.1s)

start0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

analyze751.0ms (3.7%)

Memory
-97.1MiB live, 725.7MiB 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)

sample5.8s (28.9%)

Memory
84.4MiB live, 6 638.6MiB allocated
Samples
2.5s13 122×0invalid
2.0s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 3.7s
ival-mult: 1.1s (30.4% of total)
ival-div: 1.1s (29.5% of total)
ival-pow: 1.0s (27.5% of total)
ival-pow2: 317.0ms (8.7% of total)
ival-sub: 98.0ms (2.7% of total)
exact: 21.0ms (0.6% of total)
ival-true: 17.0ms (0.5% of total)
ival-assert: 10.0ms (0.3% of total)
Bogosity

explain337.0ms (1.7%)

Memory
43.9MiB live, 623.6MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
660-4(4.929058591695838e-30 4.4119672756072746e+184 8.477189424527844e+291 2.910563079575886e+212 -1.5310426972247442e+283)(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
570-3(5.571354859660076e-289 1.1994876984969292e+29 1.9821262404729995e+280 -1.2839060645071266e-142 -3.105006729401294e-254)(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
320-2(-1.0873722065259393e+218 -2.553076604211717e+27 -6.246213172375598e-58 -2.2783396753970578e-99 -1.5707376968820165e+161)(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
270-0-(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
240-1(6.091328137137336e-192 4.963671496596431e+88 5.795138117323498e-151 -3.726559963602333e-170 -4.58058204213774e-147)(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
00-0-D
00-0-(*.f64 #s(literal 2 binary64) d)
00-0-(/.f64 h l)
00-0-(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
00-0-d
00-0-#s(literal 1 binary64)
00-0-(/.f64 d l)
00-0-(*.f64 M D)
00-0-(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
00-0-(/.f64 d h)
00-0-(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))
00-0-#s(literal 2 binary64)
00-0-l
00-0-(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
00-0-M
00-0-h
00-0-(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
pow.f64(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))uflow-rescue340
↳(/.f64 d l)underflow34
pow.f64(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))oflow-rescue320
↳(/.f64 d h)overflow32
pow.f64(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))oflow-rescue280
↳(/.f64 d l)overflow28
pow.f64(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))uflow-rescue220
↳(/.f64 d h)underflow22
*.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*o150
↳(/.f64 d h)underflow22
↳(/.f64 d l)underflow34
↳(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))underflow22
↳(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))overflow80
↳(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))overflow80
↳(/.f64 h l)overflow21
↳(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))overflow87
↳(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))overflow87
↳(*.f64 M D)overflow36
↳(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))overflow48
/.f64(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))o/n110
↳(*.f64 M D)overflow36
*.f64(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))n*o100
*.f64(*.f64 (*.f64 (/.f64 #s(literal 1 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*o60
*.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*u40
↳(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))overflow80
↳(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))overflow80
↳(*.f64 M D)overflow36
↳(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))overflow48
↳(/.f64 h l)underflow23
*.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*u20
/.f64(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))u/n10
↳(*.f64 M D)underflow30
Confusion
Predicted +Predicted -
+702
-38146
Precision
0.6481481481481481
Recall
0.9722222222222222
Confusion?
Predicted +Predicted MaybePredicted -
+7002
-380146
Precision?
0.6481481481481481
Recall?
0.9722222222222222
Freqs
test
numberfreq
0148
167
226
314
41
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
111.0ms512×0valid
Compiler

Compiled 352 to 70 computations (80.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 84.0ms
ival-pow: 23.0ms (27.3% of total)
ival-mult: 22.0ms (26.1% of total)
ival-div: 20.0ms (23.7% of total)
ival-pow2: 15.0ms (17.8% of total)
ival-sub: 2.0ms (2.4% of total)
exact: 1.0ms (1.2% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

preprocess159.0ms (0.8%)

Memory
22.6MiB live, 203.8MiB 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.6MiB live, 0.6MiB allocated
Compiler

Compiled 5 to 5 computations (0% saved)

prune1.0ms (0%)

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

Compiled 40 to 22 computations (45% saved)

simplify122.0ms (0.6%)

Memory
-25.2MiB live, 135.1MiB 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)

localize89.0ms (0.4%)

Memory
-34.7MiB live, 153.5MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy6.577116361978389
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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.212226895172746
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy13.17521895954578
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy15.296896683108013
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Samples
49.0ms256×0valid
Compiler

Compiled 156 to 24 computations (84.6% saved)

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

series52.0ms (0.3%)

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

51 calls:

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

simplify137.0ms (0.7%)

Memory
8.2MiB live, 161.6MiB allocated
Algorithm
1×egg-herbie
Rules
6 660×lower-fma.f64
6 660×lower-fma.f32
5 620×lower-*.f64
5 620×lower-*.f32
3 426×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01203277
13213193
211473183
326353164
454943164
085383125
Stop Event
1×iter limit
1×node limit
Counts
204 → 204
Calls
Call 1
Inputs
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
Outputs
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) #s(literal 1/4 binary64)) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 d d) l))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.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))) (* -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 (/.f64 M (*.f64 d d)) M) (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 (/.f64 M (*.f64 d d)) M) (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 (/.f64 M (*.f64 d d)) M) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) (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)
(/ (+ (* -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 h h) (/.f64 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 h h) (/.f64 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 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.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 (*.f64 l l) h) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 h h) l) 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 (*.f64 l l) h) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 h h) l) 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 (*.f64 l l) h) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 h h) l) h))) d)) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (*.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 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 l l) h) l))) (*.f64 M M)) (*.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 h h) l) 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 l l) h) l))) (*.f64 M M)) (*.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 h h) l) 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 l l) h) l))) (*.f64 M M)) (*.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 h h) l) h))))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.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 h) (*.f64 l l))) 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 h) (*.f64 l l))) 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 h) (*.f64 l l))) d)) (*.f64 l 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.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)))))
(fma.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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)))))
(fma.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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)))))
(fma.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.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)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))

rewrite171.0ms (0.9%)

Memory
-4.5MiB live, 193.6MiB allocated
Rules
7 446×lower-*.f32
7 434×lower-*.f64
4 352×lower-fma.f64
4 352×lower-fma.f32
3 368×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02264
03860
112459
282859
0872658
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
6 → 603
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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 h d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 h d) #s(literal -1/8 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/8 binary64)))
(*.f64 (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (pow.f64 d #s(literal 1/4 binary64))) (pow.f64 h #s(literal -1/4 binary64)))
(*.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 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 d h)))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/8 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/8 binary64)) (pow.f64 (/.f64 h d) #s(literal -1/4 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 d #s(literal 1/4 binary64)) (*.f64 (pow.f64 h #s(literal -1/4 binary64)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.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 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d h)))
(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 (/.f64 d h) #s(literal 1/2 binary64))
(/.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 (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 (/.f64 d h)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/8 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/8 binary64)))
(*.f64 (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 d #s(literal 1/4 binary64))) (pow.f64 l #s(literal -1/4 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (*.f64 #s(literal 1 binary64) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 l #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/8 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/8 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))))
(*.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 d #s(literal 1/4 binary64)) (*.f64 (pow.f64 l #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))))
(*.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) #s(literal 1 binary64)))
(*.f64 (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)) #s(literal 1 binary64)))
(*.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)) #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 (*.f64 (sqrt.f64 (neg.f64 d)) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 l)))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal 1 binary64)) (sqrt.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 d)) (sqrt.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 (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 (*.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 M (/.f64 #s(literal 1/2 binary64) d))) #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 D d) #s(literal 1/2 binary64))) (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M))) (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 M d)) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) 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 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))) (*.f64 (/.f64 M d) (/.f64 M d)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))
(*.f64 (/.f64 (*.f64 (neg.f64 M) D) #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #s(literal -2 binary64)) (/.f64 (*.f64 (neg.f64 M) D) d))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 M (/.f64 D d))))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (neg.f64 d)) (*.f64 (*.f64 D M) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) d) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (/.f64 #s(literal 2 binary64) M)) (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (/.f64 d D)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (/.f64 d D)) (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (/.f64 #s(literal 2 binary64) M)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (/.f64 #s(literal 2 binary64) D)) (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (/.f64 d M)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (/.f64 d M)) (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (*.f64 #s(literal 2 binary64) d)) (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (/.f64 #s(literal 1 binary64) (*.f64 D M))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) #s(literal 2 binary64)) (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (/.f64 d (*.f64 D M))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) d) (/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (/.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 d M)) (/.f64 (/.f64 M d) (/.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 d 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 D d) #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) d)) (/.f64 M (/.f64 #s(literal 1 binary64) (*.f64 D M))))
(*.f64 (/.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (/.f64 M (/.f64 d (*.f64 D M))))
(*.f64 (/.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) 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 (neg.f64 (/.f64 #s(literal 1/2 binary64) d)) (/.f64 d D)))
(*.f64 (/.f64 (*.f64 (neg.f64 M) D) (/.f64 d D)) (/.f64 (neg.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 (neg.f64 (/.f64 #s(literal 1/2 binary64) d)) (/.f64 d M)))
(*.f64 (/.f64 (*.f64 (neg.f64 M) D) (/.f64 d M)) (/.f64 (neg.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) D) M) #s(literal -2 binary64)))
(*.f64 (/.f64 (*.f64 (neg.f64 M) D) d) (/.f64 (neg.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 M (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 2 binary64) M)))
(*.f64 (/.f64 D (/.f64 #s(literal 2 binary64) D)) (/.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) (/.f64 d M)))
(*.f64 (/.f64 D (/.f64 d M)) (/.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 d D)) (/.f64 M (/.f64 #s(literal 2 binary64) M)))
(*.f64 (/.f64 M (/.f64 #s(literal 2 binary64) M)) (/.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 d D)))
(*.f64 (/.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) M)) (*.f64 M (/.f64 D d)))
(*.f64 (/.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 d M)) (/.f64 M (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 M (/.f64 #s(literal 2 binary64) D)) (/.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 d M)))
(*.f64 (/.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) D)) (/.f64 M (/.f64 d M)))
(*.f64 (/.f64 M (/.f64 d M)) (/.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 d M)) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 2 binary64) D)) (/.f64 M d))
(*.f64 (pow.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (/.f64 D d))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 D M) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (pow.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 (/.f64 M d) M)) #s(literal 1 binary64)) (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 D M) D) M) #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 (/.f64 D d) #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 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 M d) #s(literal 2 binary64)) (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) #s(literal 2 binary64)))
(*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) (/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 d (*.f64 D M))))
(*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) (/.f64 (/.f64 D d) (/.f64 #s(literal 2 binary64) (*.f64 D M))))
(*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) (/.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 D M))))
(*.f64 (*.f64 M (/.f64 D d)) (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 2 binary64) (*.f64 D M))))
(*.f64 (*.f64 M (/.f64 D d)) (/.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) M)))
(*.f64 (*.f64 M (/.f64 D d)) (*.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 #s(literal -1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 D M)) (neg.f64 (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 (*.f64 (/.f64 D d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) (*.f64 M #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 D M))))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) (*.f64 D M))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) 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 M (/.f64 #s(literal 1/2 binary64) d))) (*.f64 (/.f64 #s(literal 1/2 binary64) d) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 D M) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 (/.f64 M d) M)) (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))
(*.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 M (/.f64 D d)))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M (/.f64 D d))) (/.f64 (neg.f64 (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 1 binary64) (*.f64 D M))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 #s(literal -1/2 binary64) (*.f64 M (/.f64 D d))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)))
(*.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 (/.f64 #s(literal 1/2 binary64) d) D) M)))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) (/.f64 d (*.f64 D M))))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 d M)))
(*.f64 (/.f64 M d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)))
(*.f64 (/.f64 M d) (/.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 D M))))
(*.f64 (/.f64 M d) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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) D) M) (neg.f64 d)))
(*.f64 (*.f64 (*.f64 D M) #s(literal -1/2 binary64)) (/.f64 (neg.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 (/.f64 #s(literal 1 binary64) d) (/.f64 #s(literal 1 binary64) d)))
(*.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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) D) (neg.f64 M)) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (*.f64 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) (*.f64 M #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 (*.f64 D M) D) M) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 D M) D) M) (*.f64 (neg.f64 (/.f64 #s(literal 1/2 binary64) d)) (neg.f64 (/.f64 #s(literal 1/2 binary64) d))))
(*.f64 (*.f64 (*.f64 (*.f64 D M) D) M) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 d d))))
(*.f64 (*.f64 (*.f64 (*.f64 D M) D) M) (pow.f64 (neg.f64 (/.f64 #s(literal 1/2 binary64) d)) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 D M) D) M) (*.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 (/.f64 D d) (/.f64 D d)) #s(literal 1 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 D M) (/.f64 #s(literal 1 binary64) (*.f64 D M))))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1/2 binary64) d)) (*.f64 (*.f64 (*.f64 D M) D) M))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1/2 binary64) d)) (*.f64 M M))
(*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)))
(*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 (/.f64 M d) (/.f64 #s(literal 2 binary64) (*.f64 D M))))
(*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 d (*.f64 D M))))
(*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 1 binary64) (*.f64 D M))))
(*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.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 #s(literal 1 binary64) d) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)))
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) (/.f64 #s(literal 2 binary64) (*.f64 D M)))))
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) 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 M (/.f64 #s(literal 1/2 binary64) d)) (/.f64 d D)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) (*.f64 D M))))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (*.f64 (*.f64 D M) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))
(*.f64 (/.f64 D d) (/.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) (/.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 M #s(literal 1/2 binary64)) (*.f64 (/.f64 D d) (/.f64 D d))))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 D d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64)))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (/.f64 d (*.f64 D M))))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 D d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64)))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (*.f64 (*.f64 (/.f64 D d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))
(*.f64 (*.f64 (neg.f64 M) D) (*.f64 (neg.f64 (/.f64 #s(literal 1/2 binary64) d)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)))
(*.f64 (*.f64 (neg.f64 M) D) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 (neg.f64 M) D))))
(*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1 binary64) (*.f64 D M))))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M))
(*.f64 (*.f64 D M) (*.f64 (*.f64 D M) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1/2 binary64) d))))
(*.f64 (*.f64 D M) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64)))
(*.f64 (*.f64 D M) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))))
(*.f64 (*.f64 D M) (pow.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64)))
(*.f64 (*.f64 D M) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))
(*.f64 D (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)))
(*.f64 D (*.f64 M (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d)))))
(*.f64 M (*.f64 M (*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1/2 binary64) d))))
(*.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 D d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d)))))
(*.f64 M (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64)))
(*.f64 M (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64)))
(*.f64 M (*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 d (*.f64 D M))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #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) D) M)))
(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 #s(literal 2 binary64) (/.f64 d (*.f64 D M))) #s(literal -2 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 M) (*.f64 (*.f64 (/.f64 D d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d)))) #s(literal -2 binary64))
(/.f64 (*.f64 M (*.f64 (*.f64 (/.f64 D d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d)))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 D d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d)))) (/.f64 #s(literal 2 binary64) M))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 D M) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (neg.f64 d))
(/.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 #s(literal -1/2 binary64) (*.f64 M (/.f64 D 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 #s(literal -2 binary64) (*.f64 d d)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D M) D) (*.f64 M #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 d d) #s(literal 2 binary64)))
(/.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 (*.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 M (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal 1 binary64) d)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D M) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) #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 (*.f64 #s(literal 2 binary64) d) D))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (*.f64 M (/.f64 D d))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (*.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 M (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) d))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (*.f64 #s(literal -2 binary64) (/.f64 d (*.f64 D M))))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #s(literal -1 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 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)))) (*.f64 (neg.f64 d) d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) D) (neg.f64 M))) (neg.f64 (*.f64 #s(literal -2 binary64) (*.f64 d d))))
(/.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) d) d)
(/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 D M)) (*.f64 #s(literal -2 binary64) d))
(/.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 (/.f64 #s(literal 1/2 binary64) d))) (*.f64 #s(literal 2 binary64) d))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 (/.f64 M d) M)) (/.f64 (*.f64 #s(literal 2 binary64) d) D))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 #s(literal -2 binary64) (/.f64 d (*.f64 D M))))
(/.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 (*.f64 M #s(literal 1/2 binary64)) D) D) (neg.f64 M)) (*.f64 #s(literal -2 binary64) (*.f64 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) (*.f64 M #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 D M) D) M) (*.f64 #s(literal 4 binary64) (*.f64 d d)))
(/.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 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 (neg.f64 M) D)))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 D M))))
(/.f64 (*.f64 D M) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 (neg.f64 M) D))))
(/.f64 (*.f64 D M) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)))
(/.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 #s(literal -1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 D M))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 (*.f64 (*.f64 D M) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d)))))
(/.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 d d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D M) D) (*.f64 M #s(literal 1/2 binary64)))))
(/.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 (*.f64 #s(literal -2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) D) (neg.f64 M))))
(/.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 #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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (neg.f64 d) d)))
(exp.f64 (+.f64 (log.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (log.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M))))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #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) D) M)) #s(literal 2 binary64)))
#s(literal 1/2 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 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 D M) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d)))) (/.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 D d) #s(literal 1/2 binary64)))
(*.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 D d)))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 D M) D) M)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 M M)) (*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 M #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 D d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) (*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) 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) D) M))
(*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) l)) h)
(*.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) 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) D) M) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (/.f64 (neg.f64 h) l))
(*.f64 (/.f64 #s(literal 1/2 binary64) l) (/.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/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) D) M) 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 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) l) h)
(*.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 M (/.f64 #s(literal 1/2 binary64) d))) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 M (/.f64 h l))))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) (*.f64 (/.f64 #s(literal 1 binary64) l) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) h) (/.f64 #s(literal -1 binary64) l))
(*.f64 (*.f64 (*.f64 (*.f64 D M) D) M) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1/2 binary64) 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 D d)) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1/2 binary64) d)) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (*.f64 h #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (*.f64 (/.f64 #s(literal 1 binary64) l) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 h #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1/2 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/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 h #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 D d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 h) (*.f64 (/.f64 #s(literal -1 binary64) l) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1 binary64))
(*.f64 (/.f64 h l) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) (*.f64 (/.f64 h l) #s(literal 1 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) (/.f64 h l))
(*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (*.f64 (/.f64 h l) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 M (/.f64 h l))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (*.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 (/.f64 #s(literal 1/2 binary64) d) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(*.f64 M (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) D) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))))
(*.f64 h (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) l) #s(literal 1 binary64)))
(*.f64 h (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) l)))
(*.f64 h (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) l))
(pow.f64 (/.f64 l (*.f64 (*.f64 h #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (neg.f64 h)) #s(literal 1/2 binary64)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) #s(literal 1/2 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 #s(literal -1/2 binary64) (*.f64 M (/.f64 D 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 M (/.f64 #s(literal 1/2 binary64) d))) (*.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 #s(literal -2 binary64) (*.f64 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 d d) #s(literal 2 binary64)))
(/.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 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 (neg.f64 M) D)))
(/.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) D) M) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 D M))))
(/.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 #s(literal -1/2 binary64) (*.f64 M (/.f64 D 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 (*.f64 M #s(literal 1/2 binary64)) D) D) (neg.f64 M))) (*.f64 #s(literal -2 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 d d) #s(literal 2 binary64)))
(/.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 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 (neg.f64 M) D)))
(/.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 h #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal -1 binary64)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/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 M (/.f64 #s(literal 1/2 binary64) d)))) (*.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) D) M)) (*.f64 #s(literal 2 binary64) (/.f64 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 (*.f64 h #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1 binary64)) l)
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) h) #s(literal 1 binary64)) (neg.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) h)) (neg.f64 l))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (neg.f64 h))) l)
(/.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 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) h) (neg.f64 l))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 l (*.f64 (*.f64 h #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))))))
(/.f64 (*.f64 (*.f64 h #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) l)
(/.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (/.f64 (neg.f64 l) h))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) (/.f64 l h))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l (*.f64 (*.f64 h #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 h #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))))
(*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (*.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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (*.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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (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 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h))) (*.f64 l l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (/.f64 #s(literal -1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.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 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1/4 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h))) (*.f64 l l)))) (/.f64 #s(literal -1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1/4 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/8 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/8 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)))))
(*.f64 (pow.f64 d #s(literal 1/4 binary64)) (*.f64 (pow.f64 h #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (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/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #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 (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h))))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h))) (*.f64 l l))) (*.f64 (/.f64 #s(literal -1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal -1 binary64))) (sqrt.f64 (/.f64 (*.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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 3 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1/4 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h))) (*.f64 l l)))) (sqrt.f64 (/.f64 d h))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (pow.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))) (*.f64 d d))) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d h))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1/4 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h))) (*.f64 l l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal -1 binary64)))
(/.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.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))) (*.f64 d d))) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (neg.f64 (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1/4 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (neg.f64 l)))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (+.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h))) (*.f64 l l)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal -1 binary64)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 (-.f64 #s(literal 1 binary64) (pow.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))) (*.f64 d d))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1/4 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (sqrt.f64 h))
(/.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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))) (-.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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))))))
(/.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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(literal 3 binary64))) (fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))))) (*.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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h))) (*.f64 l l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (neg.f64 (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1/4 binary64) #s(literal 1/2 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 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h))) (*.f64 l l))))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1/4 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) 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 D D) (*.f64 (*.f64 M M) #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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1/4 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1/4 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h))) (*.f64 l l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1/4 binary64) #s(literal 1/2 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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) h))) (*.f64 l l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 1/4 binary64) #s(literal 1/2 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 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #s(literal 3 binary64))))))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (*.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)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (*.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)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (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)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (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))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) h)) (/.f64 #s(literal 1 binary64) l) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 (neg.f64 h) l)) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal -1/2 binary64)) (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))) (/.f64 h l) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64))) (/.f64 (neg.f64 h) l) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (neg.f64 d) d)) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.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/8 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.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/8 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 d #s(literal 1/4 binary64))) (pow.f64 h #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 d #s(literal 1/4 binary64))) (pow.f64 h #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.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/8 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.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/8 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 d #s(literal 1/4 binary64))) (pow.f64 l #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 d #s(literal 1/4 binary64))) (pow.f64 l #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (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))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 #s(literal 1 binary64) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (*.f64 (/.f64 d h) d) #s(literal 1/2 binary64)) (/.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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (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/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(literal -1/2 binary64)) (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))) (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (/.f64 (neg.f64 h) l) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.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)) (*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/8 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/8 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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/8 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/8 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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/8 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/8 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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/8 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/8 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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) h) (*.f64 (/.f64 #s(literal 1 binary64) l) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (pow.f64 d #s(literal 1/4 binary64)) (*.f64 (pow.f64 h #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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 d #s(literal 1/4 binary64)) (*.f64 (pow.f64 h #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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (pow.f64 d #s(literal 1/4 binary64)) (*.f64 (pow.f64 l #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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 d #s(literal 1/4 binary64)) (*.f64 (pow.f64 l #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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (/.f64 d h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (/.f64 d h))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d l) h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (sqrt.f64 d) (pow.f64 (/.f64 (/.f64 d l) h) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (pow.f64 (/.f64 (/.f64 d l) h) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 #s(literal -1 binary64) (*.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))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (*.f64 (/.f64 h l) (sqrt.f64 (/.f64 (*.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 (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 d l)) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.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))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (neg.f64 h) l) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(literal -1/2 binary64)) (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (neg.f64 d) d)) (/.f64 h l)) (sqrt.f64 (/.f64 (*.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 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))) (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 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))))

eval180.0ms (0.9%)

Memory
-45.5MiB live, 267.6MiB allocated
Compiler

Compiled 32 235 to 2 662 computations (91.7% saved)

prune160.0ms (0.8%)

Memory
33.5MiB live, 429.6MiB allocated
Pruning

32 alts after pruning (32 fresh and 0 done)

PrunedKeptTotal
New77732809
Fresh000
Picked101
Done000
Total77832810
Accuracy
91.8%
Counts
810 → 32
Alt Table
Click to see full alt table
StatusAccuracyProgram
20.3%
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) h) (*.f64 (/.f64 #s(literal 1 binary64) l) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
▶19.8%
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
48.3%
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
47.9%
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
29.9%
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
22.0%
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
28.9%
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
47.7%
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))))
48.4%
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
57.6%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 D M) D) M)) (*.f64 #s(literal 4 binary64) (*.f64 d d)))))
▶74.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 #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) D) M) (/.f64 #s(literal 1 binary64) h)))))
68.6%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))))
▶61.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 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d)))))
43.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) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
34.1%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
34.1%
(*.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 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
72.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
42.3%
(*.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))))
35.1%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
72.6%
(*.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))))
42.3%
(*.f64 (*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (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))))
42.3%
(*.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))))
18.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
34.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 (*.f64 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
▶13.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 h) (*.f64 l l))) d)) (*.f64 l l)))
13.2%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (*.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))
26.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (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 (*.f64 l l) h) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 h h) l) h))) d)) h))
13.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (/.f64 M (*.f64 d d)) M) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d))
17.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 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
15.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/8 binary64) (*.f64 M M)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))))
▶24.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
31.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 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
Compiler

Compiled 2 338 to 1 424 computations (39.1% saved)

simplify298.0ms (1.5%)

Memory
-13.3MiB live, 198.3MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff448
(-.f64 #s(literal 1 binary64) (*.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 D 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-diff0
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))
cost-diff0
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l))
cost-diff320
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))
cost-diff2368
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
cost-diff0
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
cost-diff0
(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 h) (*.f64 l l))) d))
cost-diff0
(/.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 h) (*.f64 l l))) d)) (*.f64 l l))
cost-diff0
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l)))
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-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff1088
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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 628×lower-*.f32
6 572×lower-*.f64
3 616×lower-/.f32
3 586×lower-/.f64
1 306×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
082706
0139690
1283650
2901640
32964640
46454640
08043633
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 #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) D) M) (/.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 #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) D) M) (/.f64 #s(literal 1 binary64) h))))
(*.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) D) M) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) 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 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(/.f64 #s(literal 1/2 binary64) d)
(/.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
#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 h) (*.f64 l l))) d)) (*.f64 l 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 h) (*.f64 l l))) d)) (*.f64 l l))
(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 h) (*.f64 l l))) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(*.f64 #s(literal -1/8 binary64) (*.f64 M M))
#s(literal -1/8 binary64)
(*.f64 M M)
M
(/.f64 (*.f64 D D) d)
(*.f64 D D)
D
d
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
l
h
(*.f64 (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) d)
(sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l)))
(*.f64 (/.f64 l h) (*.f64 l l))
(/.f64 l h)
(*.f64 l l)
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))
(/.f64 (*.f64 d d) (*.f64 h l))
(*.f64 d d)
d
(*.f64 h l)
h
l
(/.f64 h l)
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))
#s(literal -1/2 binary64)
(/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(*.f64 D D)
D
(*.f64 (*.f64 M M) #s(literal 1/4 binary64))
(*.f64 M M)
M
#s(literal 1/4 binary64)
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 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 D d)))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(*.f64 (/.f64 h l) #s(literal 1/2 binary64))
(/.f64 h l)
#s(literal 1/2 binary64)
(*.f64 (*.f64 M M) #s(literal 1/4 binary64))
(*.f64 M M)
M
#s(literal 1/4 binary64)
(*.f64 (/.f64 D d) (/.f64 D d))
(/.f64 D d)
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 #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) D) M) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D #s(literal 1/2 binary64))) h)) (*.f64 (*.f64 l d) d))) (*.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) (*.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) D) M) (/.f64 #s(literal 1 binary64) h))))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D #s(literal 1/2 binary64))) h)) (*.f64 (*.f64 l d) d)))
(*.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) D) M) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D #s(literal 1/2 binary64))) h)) (*.f64 (*.f64 l d) d))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l)
(/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (*.f64 l 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)
#s(literal 1/2 binary64)
(*.f64 D #s(literal 1/2 binary64))
D
(/.f64 M d)
M
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) h)
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(/.f64 #s(literal 1/2 binary64) d)
(/.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
#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 h) (*.f64 l l))) d)) (*.f64 l l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 l h) l) l)) d (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) D) d) D) (sqrt.f64 (*.f64 l h)))) (*.f64 l 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 h) (*.f64 l l))) d)) (*.f64 l l))
(/.f64 (fma.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 l h) l) l)) d (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) D) d) D) (sqrt.f64 (*.f64 l h)))) (*.f64 l l))
(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 h) (*.f64 l l))) d))
(fma.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 l h) l) l)) d (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) D) d) D) (sqrt.f64 (*.f64 l h))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) D) d) D)
(*.f64 #s(literal -1/8 binary64) (*.f64 M M))
(*.f64 (*.f64 M M) #s(literal -1/8 binary64))
#s(literal -1/8 binary64)
(*.f64 M M)
M
(/.f64 (*.f64 D D) d)
(*.f64 D D)
D
d
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
l
h
(*.f64 (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) d)
(*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 l h) l) l)) d)
(sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l)))
(sqrt.f64 (*.f64 (*.f64 (/.f64 l h) l) l))
(*.f64 (/.f64 l h) (*.f64 l l))
(*.f64 (*.f64 (/.f64 l h) l) l)
(/.f64 l h)
(*.f64 l l)
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (fma.f64 h (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 l (*.f64 d d))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d (*.f64 l h)) d)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l))
(*.f64 (/.f64 h l) (sqrt.f64 (*.f64 (/.f64 d (*.f64 l h)) d)))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))
(sqrt.f64 (*.f64 (/.f64 d (*.f64 l h)) d))
(/.f64 (*.f64 d d) (*.f64 h l))
(*.f64 (/.f64 d (*.f64 l h)) d)
(*.f64 d d)
d
(*.f64 h l)
(*.f64 l h)
h
l
(/.f64 h l)
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 d d)) (*.f64 D D))
#s(literal -1/2 binary64)
(/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) D) (/.f64 D (*.f64 d d)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M))
(*.f64 D D)
D
(*.f64 (*.f64 M M) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (*.f64 M M))
(*.f64 M M)
M
#s(literal 1/4 binary64)
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d)))))
(*.f64 (*.f64 (fma.f64 h (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 l (*.f64 d 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))) (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 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))))
(fma.f64 h (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(*.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 D d)))
(*.f64 (*.f64 #s(literal 1/2 binary64) h) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 l (*.f64 d d))))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))
(*.f64 (/.f64 h l) #s(literal 1/2 binary64))
(/.f64 h l)
#s(literal 1/2 binary64)
(*.f64 (*.f64 M M) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (*.f64 M M))
(*.f64 M M)
M
#s(literal 1/4 binary64)
(*.f64 (/.f64 D d) (/.f64 D d))
(*.f64 (/.f64 D (*.f64 d d)) D)
(/.f64 D d)
D

localize298.0ms (1.5%)

Memory
-4.0MiB live, 543.7MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy9.970514593201719
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
accuracy11.304376789698198
(*.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 D d)))
accuracy13.175218959545782
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy15.296896683108024
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy14.571136881654382
(/.f64 (*.f64 d d) (*.f64 h l))
accuracy14.6536303924522
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
accuracy15.958959688387514
(/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))
accuracy18.886667209593334
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))
accuracy18.709061270011464
(sqrt.f64 (*.f64 l h))
accuracy21.824209332480752
(/.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 h) (*.f64 l l))) d)) (*.f64 l l))
accuracy22.19603236532944
(sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l)))
accuracy34.64745961229978
#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 h) (*.f64 l l))) d)) (*.f64 l l)))
accuracy0.21484375
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
accuracy0.7312122349895899
(/.f64 #s(literal 1 binary64) (*.f64 l h))
accuracy18.911760502718256
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
accuracy47.00430685571913
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
accuracy5.461722243270007
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
accuracy6.577116361978389
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
accuracy13.175218959545782
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy15.296896683108024
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Samples
197.0ms256×0valid
Compiler

Compiled 711 to 77 computations (89.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 135.0ms
ival-div: 60.0ms (44.4% of total)
ival-mult: 47.0ms (34.8% of total)
ival-pow: 12.0ms (8.9% of total)
ival-sqrt: 7.0ms (5.2% of total)
ival-sub: 3.0ms (2.2% of total)
ival-pow2: 3.0ms (2.2% of total)
ival-add: 2.0ms (1.5% of total)
exact: 1.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series223.0ms (1.1%)

Memory
17.6MiB live, 250.3MiB allocated
Counts
24 → 960
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 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 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 #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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())
#s(alt (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())
#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())
#s(alt (*.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 D d))) (patch (*.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 D d))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())
Outputs
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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 (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 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 (* -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 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 (* -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 (* -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 (* -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 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 (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 (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 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (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 (* 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 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (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 (* 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 (* 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 (* (* 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 (* 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 (* 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 (* (* 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 (* 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 (* 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 (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 (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 (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 (* (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 (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 (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 (* (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 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 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* 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 (/ 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 (* 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 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l 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 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (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 h) (*.f64 l l))) d)) (*.f64 l l)) (patch (/.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 h) (*.f64 l l))) d)) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 M) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 M) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 M) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 M) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf M) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor inf M) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor inf M) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor inf M) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf M) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf M) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf M) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf M) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 D) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 D) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 D) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 D) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf D) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor inf D) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor inf D) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor inf D) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf D) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf D) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf D) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf D) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 d) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d) (taylor 0 d) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d) (taylor 0 d) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d) (taylor 0 d) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf d) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))) (taylor inf d) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))) (taylor inf d) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))) (taylor inf d) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor -inf d) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))) (taylor -inf d) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))) (taylor -inf d) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))) (taylor -inf d) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 l) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 l) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 l) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 l) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf l) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h))) (taylor -inf l) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 h) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h) (taylor 0 h) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h) (taylor 0 h) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h) (taylor 0 h) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf h) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3)))))) (taylor inf h) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3)))))) (taylor inf h) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3)))))) (taylor inf h) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h))))))) (taylor -inf h) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h))))))) (taylor -inf h) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h))))))) (taylor -inf h) (#s(alt (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 h) (*.f64 l l))) d)) (patch (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 h) (*.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (patch (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.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 D d)))) (patch (-.f64 #s(literal 1 binary64) (*.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 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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) (*.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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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) (*.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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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) (*.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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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) (*.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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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) (*.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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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) (*.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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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) (*.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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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) (*.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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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) (*.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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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) (*.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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.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) (*.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) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) (patch (sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l))) #<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 (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 (* -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 (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 (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d d) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 h l)) (patch (/.f64 (*.f64 d 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d))) (patch (*.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 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
Calls

240 calls:

TimeVariablePointExpression
35.0ms
l
@0
(/ (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (* l l))
32.0ms
h
@0
(/ (* (* (/ 1/2 d) D) M) (/ 1 h))
27.0ms
h
@0
(* (* (/ h l) 1/2) (* (* M M) 1/4))
3.0ms
M
@0
(+ (* (* (sqrt (/ (* d d) (* h l))) (/ h l)) (* -1/2 (/ (* (* D D) (* (* M M) 1/4)) (* d d)))) (sqrt (/ (* d d) (* h l))))
2.0ms
M
@0
(/ (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (* l l))

simplify241.0ms (1.2%)

Memory
-17.0MiB live, 378.0MiB allocated
Algorithm
1×egg-herbie
Rules
6 478×lower-*.f64
6 478×lower-*.f32
4 060×lower-/.f32
4 060×lower-/.f64
3 724×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
023015432
168814946
2248914825
3566414783
0848814489
Stop Event
1×iter limit
1×node limit
Counts
960 → 960
Calls
Call 1
Inputs
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* d (sqrt (/ (pow l 3) h)))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(* d (sqrt (/ (pow l 3) h)))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d)
(* d (sqrt (/ (pow l 3) h)))
(* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))
(* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))
(* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))
(* d (sqrt (/ (pow l 3) h)))
(* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))))
(* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))))
(* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(* d (sqrt (/ (pow l 3) h)))
(* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))))
(* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))))
(* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h)))
(* (pow l 2) (+ (* 1/8 (* (/ (* (pow 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 l 2) (+ (* 1/8 (* (/ (* (pow 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 l 2) (+ (* 1/8 (* (/ (* (pow 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 (/ (pow l 3) h)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3))))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h)))))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* -1 (* d (sqrt (/ h (pow l 3)))))
(* -1 (* d (sqrt (/ h (pow l 3)))))
(* -1 (* d (sqrt (/ h (pow l 3)))))
(* -1 (* d (sqrt (/ h (pow l 3)))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* d (sqrt (/ h (pow l 3))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(* (* d (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))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(sqrt (/ (pow l 3) h))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
(* 1/8 (/ (* (pow M 2) h) l))
Outputs
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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))) (* -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 (* (* 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 #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 (* 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 #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 (* 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 #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)
(/ (+ (* -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 h h) (/.f64 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 h h) (/.f64 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 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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) (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)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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)
(+ (* -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 (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (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) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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))
(* 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (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) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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 (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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* 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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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 (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* (sqrt (/ 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))))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* (sqrt (/ 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 (* 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 (* 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 (* 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 (* 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 (* 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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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))) (* -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 (* (* 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 #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 (* 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 #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 (* 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 #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)
(/ (+ (* -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 h h) (/.f64 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 h h) (/.f64 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 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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) (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)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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)
(+ (* -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 (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (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) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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))
(* 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (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) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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))
(* 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (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) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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))
(* 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (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) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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))) (* -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)
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 #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 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 #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 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 #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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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)
(+ (* -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 (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 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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (*.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 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 (/ (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 h h) (/.f64 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 h h) (/.f64 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 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)))
(* d (sqrt (/ (pow l 3) h)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* d (sqrt (/ (pow l 3) h)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 M M)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 M M)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 M M)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) (*.f64 d d))) d)
(* d (sqrt (/ (pow l 3) h)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)
(* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))) d)
(* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))) d)
(* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))) d)
(* d (sqrt (/ (pow l 3) h)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)
(* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))) d)
(* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))) d)
(* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* d (sqrt (/ (pow l 3) h)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)
(* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))))
(*.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)) (*.f64 l l))
(* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))))
(*.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)) (*.f64 l l))
(* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))))
(*.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)) (*.f64 l l))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h)))
(*.f64 (neg.f64 d) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))
(* (pow l 2) (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (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))))) (*.f64 l l))
(* (pow l 2) (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (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))))) (*.f64 l l))
(* (pow l 2) (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (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))))) (*.f64 l l))
(* d (sqrt (/ (pow l 3) h)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (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 l (*.f64 h h)) h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 h (*.f64 l l)) l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (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 l (*.f64 h h)) h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 h (*.f64 l l)) l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (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 l (*.f64 h h)) h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 h (*.f64 l l)) l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 l h))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 l h))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 l h))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)) h)
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h)))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 l h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h)))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 l h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h)))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 l h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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))) (* -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 (* 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 (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)))) (neg.f64 d))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (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)))) (neg.f64 d))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (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)))) (neg.f64 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 h h) (/.f64 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 h h) (/.f64 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 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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) (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)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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)
(+ (* -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 (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (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) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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))
(* 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (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) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)))
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* -1 (* d (sqrt (/ h (pow l 3)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(* -1 (* d (sqrt (/ h (pow l 3)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(* -1 (* d (sqrt (/ h (pow l 3)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(* -1 (* d (sqrt (/ h (pow l 3)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* d (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) d)
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))
(*.f64 (neg.f64 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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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 (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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 (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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.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)))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.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)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.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)))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.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)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 h (*.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) (*.f64 D D)) (/.f64 h (*.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) (*.f64 D D)) (/.f64 h (*.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)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 h (*.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) (*.f64 D D)) (/.f64 h (*.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) (*.f64 D D)) (/.f64 h (*.f64 (*.f64 d d) l))) (*.f64 M M) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.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)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.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)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.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)))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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))) (* -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 (* (* 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 #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 (* 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 #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 (* 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 #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)
(/ (+ (* -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 h h) (/.f64 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 h h) (/.f64 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 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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) (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)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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)
(+ (* -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 (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (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) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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))
(* 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (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) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(sqrt (/ (pow l 3) h))
(sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))
(* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* -1 (* (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))
(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))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* 1/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/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/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/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/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/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/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/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/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)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(/ (pow d 2) (* h l))
(*.f64 d (/.f64 d (*.f64 l h)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 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) h)) (* (pow d 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) h)) (* (pow d 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) h)) (* (pow d 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) h)) (* (pow d 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) h)) (* (pow d 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) h)) (* (pow d 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) h)) (* (pow d 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 M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))
(* 1/8 (/ (* (pow M 2) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/8 binary64))

rewrite219.0ms (1.1%)

Memory
56.7MiB live, 430.1MiB allocated
Rules
7 066×lower-*.f32
7 012×lower-*.f64
4 130×lower-/.f32
4 100×lower-/.f64
2 318×lower--.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
081397
0137380
1476331
23509319
010409316
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
24 → 699
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 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(/.f64 #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 h) (*.f64 l l))) d)) (*.f64 l 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 h) (*.f64 l l))) d)) (*.f64 l l))
(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 h) (*.f64 l l))) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 h l))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))
(-.f64 #s(literal 1 binary64) (*.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 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 #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) D) M) (/.f64 #s(literal 1 binary64) h)))))
(sqrt.f64 (*.f64 (/.f64 l h) (*.f64 l l)))
(sqrt.f64 (*.f64 l h))
(/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))
(/.f64 (*.f64 d d) (*.f64 h l))
(*.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 D d)))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
Outputs
(*.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d))
(*.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 (/.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 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d h)))
(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 (/.f64 d h) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (*.f64 d #s(literal -1 binary64))) (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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.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 (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 (/.f64 d h)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))
(*.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 (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 (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 (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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.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 (/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal -1 binary64)) (neg.f64 h))
(*.f64 (/.f64 M #s(literal 1 binary64)) (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (*.f64 M h))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) d) #s(literal 1 binary64)) (/.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 M h) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) h)))
(*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)
(*.f64 M (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) h))
(*.f64 M (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (*.f64 M h))
(*.f64 D (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M h)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (*.f64 M D) h))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 D (*.f64 M h)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) h)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))
(*.f64 h (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (/.f64 #s(literal 1 binary64) h)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 M h)) d)
(/.f64 (neg.f64 (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) (/.f64 d h))
(/.f64 (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal -1 binary64) h))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(/.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))
(/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal 1 binary64) h))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))
(neg.f64 (/.f64 (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal 1 binary64) h)))
(neg.f64 (/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal -1 binary64) h)))
(exp.f64 (-.f64 (log.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (neg.f64 (log.f64 h))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))) #s(literal -1 binary64)))
#s(literal 1/2 binary64)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (/.f64 d l)))) (sqrt.f64 (sqrt.f64 (/.f64 d h))))
(*.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (/.f64 d h)))) (sqrt.f64 (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 d d) #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (sqrt.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
(*.f64 (sqrt.f64 (sqrt.f64 (/.f64 d l))) (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 d h) (*.f64 (/.f64 d (*.f64 l h)) d)))))
(*.f64 (sqrt.f64 (sqrt.f64 (/.f64 d h))) (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 d l) (*.f64 (/.f64 d (*.f64 l h)) d)))))
(*.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 (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 (pow.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal -1/4 binary64)) (pow.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal -1/4 binary64)))
(*.f64 (/.f64 d (sqrt.f64 h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 h) l))))
(*.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.f64 (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)) (sqrt.f64 (/.f64 d l))))
(*.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 #s(literal 1 binary64) (*.f64 l h))) d)
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(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 l (/.f64 h (*.f64 d d))) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 d (*.f64 l h)) d)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal -1/2 binary64))
(pow.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64))
(pow.f64 (*.f64 (/.f64 d (*.f64 l h)) d) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d (sqrt.f64 (*.f64 l h))))) (sqrt.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 d (/.f64 d l))) (sqrt.f64 h))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) d)) (sqrt.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 h))
(/.f64 (sqrt.f64 (*.f64 (*.f64 d d) #s(literal -1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.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 (neg.f64 (*.f64 d (/.f64 d h)))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (neg.f64 (*.f64 (neg.f64 d) d))) (sqrt.f64 (neg.f64 (*.f64 (neg.f64 h) l))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 #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 d #s(literal 1 binary64))) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 d d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 l h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (*.f64 #s(literal 1 binary64) d) (sqrt.f64 (*.f64 l h)))
(/.f64 (*.f64 d #s(literal 1 binary64)) (sqrt.f64 (*.f64 l h)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (*.f64 l (/.f64 h (*.f64 d d))))))
(/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal 1 binary64))))
(/.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)))
(sqrt.f64 (*.f64 (/.f64 d (*.f64 l h)) d))
(fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))
(exp.f64 (log.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
(*.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 (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 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 h) l))))
(*.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))) #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 (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 l))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h (/.f64 #s(literal 1 binary64) l))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (*.f64 (neg.f64 h) l))))
(/.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 (neg.f64 (*.f64 (log.f64 (*.f64 l h)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 l h)) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(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 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) h))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 h) l)))
(*.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 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (*.f64 l h) (*.f64 l h)) #s(literal -1/2 binary64))
(pow.f64 (/.f64 h (/.f64 #s(literal 1 binary64) l)) #s(literal -1 binary64))
(pow.f64 (neg.f64 (*.f64 (neg.f64 h) l)) #s(literal -1 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 (/.f64 #s(literal 1 binary64) l)) (neg.f64 h))
(/.f64 (/.f64 #s(literal 1 binary64) l) h)
(/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 h) l))
(/.f64 (/.f64 #s(literal 1 binary64) h) l)
(/.f64 #s(literal 1 binary64) (/.f64 h (/.f64 #s(literal 1 binary64) l)))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (neg.f64 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))))
(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))))
#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 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) (*.f64 l l)))
(*.f64 (/.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) l) (/.f64 #s(literal 1 binary64) l))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))
(*.f64 (neg.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 l) l)))
(*.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) (/.f64 #s(literal 1 binary64) (*.f64 l l)))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) (*.f64 l l)))
(pow.f64 (/.f64 l (/.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) l)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 l l) (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 l l) (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) #s(literal -1 binary64))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (neg.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)))) (/.f64 #s(literal 1 binary64) (*.f64 l l))) (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))
(/.f64 (*.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (/.f64 #s(literal 1 binary64) (*.f64 l l))) (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (-.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))))
(/.f64 (*.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) #s(literal 1 binary64)) (*.f64 l l))
(/.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) l)) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))) (neg.f64 (*.f64 (neg.f64 l) l)))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (neg.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) (*.f64 l l)))
(/.f64 (*.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (-.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))) (*.f64 l l)))
(/.f64 (/.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) l) l)
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (neg.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)))) (*.f64 (*.f64 l l) (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (*.f64 (*.f64 l l) (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (-.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (*.f64 (neg.f64 l) l))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 l l) (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) (*.f64 l l))
(/.f64 #s(literal 1 binary64) (/.f64 l (/.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 l l) (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (*.f64 l l)))
(neg.f64 (/.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) (*.f64 (neg.f64 l) l)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 l l) (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))) #s(literal -1 binary64)))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (neg.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
(*.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (-.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))))
(pow.f64 (/.f64 (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (neg.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (-.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))) (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h)) (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (*.f64 (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)))) (*.f64 (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
(/.f64 (-.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h))) (-.f64 (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (neg.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l))))) (neg.f64 (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (-.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (neg.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)))) (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (fma.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h)) (*.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (-.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (neg.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h) (-.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))) (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)))))
(fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 l)) (sqrt.f64 h) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(fma.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))))
(fma.f64 (sqrt.f64 (/.f64 l h)) (*.f64 l d) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))))
(fma.f64 (sqrt.f64 l) (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (/.f64 (*.f64 D D) d)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(fma.f64 (*.f64 #s(literal -1/8 binary64) M) (*.f64 M (*.f64 (sqrt.f64 (*.f64 l h)) (/.f64 (*.f64 D D) d))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 l h)) l) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))))
(fma.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(fma.f64 (/.f64 (*.f64 D D) d) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (*.f64 l h)) (/.f64 (*.f64 D D) d)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(fma.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (*.f64 l h)) (/.f64 (*.f64 D D) d))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (*.f64 l h)) (/.f64 (*.f64 D D) d))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(fma.f64 d (*.f64 (sqrt.f64 (/.f64 l h)) l) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 l h)) (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (/.f64 (*.f64 (*.f64 d d) (*.f64 (*.f64 (/.f64 l h) l) l)) (-.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
(+.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))
(+.f64 (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))))
(*.f64 (*.f64 (/.f64 (*.f64 D D) d) (*.f64 #s(literal -1/8 binary64) M)) M)
(*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))
(*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) D) (/.f64 D d))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) D) D) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) #s(literal -1/8 binary64))
(*.f64 (*.f64 #s(literal -1/8 binary64) M) (*.f64 M (/.f64 (*.f64 D D) d)))
(*.f64 (/.f64 (*.f64 D D) d) (*.f64 (*.f64 M M) #s(literal -1/8 binary64)))
(*.f64 (*.f64 D D) (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d))
(*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 D D) d)))
(*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)))
(*.f64 D (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))))
(pow.f64 (/.f64 d (*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) D) D)) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (neg.f64 D) D) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (neg.f64 d))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 d (*.f64 D D)))
(/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (neg.f64 D) D)) (neg.f64 d))
(/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) #s(literal 1 binary64)) (/.f64 d (*.f64 D D)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) D) D)) (neg.f64 d))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) D) D) d)
(/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 d (*.f64 D D)))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) D) D)))
(*.f64 (fma.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) (neg.f64 (*.f64 (/.f64 d (*.f64 l h)) d))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) d) (sqrt.f64 (*.f64 l h)))))
(*.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h)))) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 d d) d) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h)))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 (-.f64 d (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))))) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))))))))
(pow.f64 (/.f64 (/.f64 (-.f64 (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) d) (sqrt.f64 (*.f64 l h))) (fma.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) (neg.f64 (*.f64 (/.f64 d (*.f64 l h)) d)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 (-.f64 d (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))))) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))))) (fma.f64 (pow.f64 (*.f64 (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h)))) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 d d) d) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h))))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))))) (/.f64 (-.f64 (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) d) (sqrt.f64 (*.f64 l h)))) (*.f64 (/.f64 (-.f64 (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) d) (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 d (*.f64 l h)) d))) (*.f64 (/.f64 (-.f64 (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) d) (sqrt.f64 (*.f64 l h))) (/.f64 (-.f64 (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) d) (sqrt.f64 (*.f64 l h)))))
(/.f64 (-.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))))) (/.f64 (-.f64 d (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))))) (sqrt.f64 (*.f64 l h))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) (neg.f64 (*.f64 (/.f64 d (*.f64 l h)) d)))) (neg.f64 (/.f64 (-.f64 (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) d) (sqrt.f64 (*.f64 l h)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h)))) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 d d) d) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h))))) (neg.f64 (fma.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 (-.f64 d (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))))) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))))))))
(/.f64 (fma.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) (neg.f64 (*.f64 (/.f64 d (*.f64 l h)) d))) (/.f64 (-.f64 (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) d) (sqrt.f64 (*.f64 l h))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h)))) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 d d) d) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h)))) (fma.f64 (/.f64 d (*.f64 l h)) d (-.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))) (/.f64 d (sqrt.f64 (*.f64 l h)))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h)))) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 d d) d) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h)))) (fma.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 (-.f64 d (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))))) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) d) (sqrt.f64 (*.f64 l h))) (fma.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) (neg.f64 (*.f64 (/.f64 d (*.f64 l h)) d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 (-.f64 d (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))))) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))))) (fma.f64 (pow.f64 (*.f64 (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h)))) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 d d) d) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 l h))))))
(fma.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (/.f64 d l)))) (sqrt.f64 (sqrt.f64 (/.f64 d h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (/.f64 d h)))) (sqrt.f64 (sqrt.f64 (/.f64 d l))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (sqrt.f64 (*.f64 (*.f64 d d) #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (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/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (sqrt.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (sqrt.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (sqrt.f64 (sqrt.f64 (/.f64 d l))) (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 d h) (*.f64 (/.f64 d (*.f64 l h)) d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (sqrt.f64 (sqrt.f64 (/.f64 d h))) (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 d l) (*.f64 (/.f64 d (*.f64 l h)) d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (/.f64 #s(literal 1 binary64) (*.f64 d d)) (/.f64 d (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))) (/.f64 (*.f64 D D) d)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 d (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (/.f64 h l) (/.f64 d (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h)))) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))) #s(literal -1/2 binary64) (/.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/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (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 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (pow.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal -1/4 binary64)) (pow.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (/.f64 d (sqrt.f64 h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 h) l))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (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/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)) (/.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/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (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/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(fma.f64 (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(fma.f64 (/.f64 h l) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(fma.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) (/.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/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(-.f64 (/.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d))))) (/.f64 (-.f64 (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) d) (sqrt.f64 (*.f64 l h)))) (/.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (/.f64 (-.f64 (*.f64 d (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 l (*.f64 d d)))) d) (sqrt.f64 (*.f64 l h)))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(+.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 D D) d)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))
(*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d)))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D)) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)) #s(literal -1/2 binary64))
(*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) #s(literal -1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 D D) d) (*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) #s(literal -1/2 binary64)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))) #s(literal -1/2 binary64)))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) #s(literal -1 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D)) d) d)
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d)) #s(literal -1/2 binary64)) d)
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) #s(literal -1/4 binary64)) #s(literal -1/2 binary64)) (*.f64 (neg.f64 d) d))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d))) d)
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) #s(literal -1/4 binary64))) (*.f64 (neg.f64 d) d))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))) (*.f64 (neg.f64 d) d))
(/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D)) (*.f64 d d))
(/.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 D D))))
(*.f64 (*.f64 (/.f64 h l) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (*.f64 (/.f64 h l) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (/.f64 h l) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 h l))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 h l)))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (/.f64 h l)))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(pow.f64 (/.f64 l (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) h)) #s(literal -1 binary64))
(/.f64 (*.f64 (neg.f64 h) (/.f64 d (sqrt.f64 (*.f64 l h)))) (neg.f64 l))
(/.f64 (*.f64 d (/.f64 h l)) (sqrt.f64 (*.f64 l h)))
(/.f64 (*.f64 (/.f64 h l) d) (sqrt.f64 (*.f64 l h)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (neg.f64 h)) (neg.f64 l))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64)) (/.f64 l h))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) h)) (neg.f64 l))
(/.f64 (*.f64 (neg.f64 h) d) (*.f64 (neg.f64 l) (sqrt.f64 (*.f64 l h))))
(/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))
(/.f64 (*.f64 d (neg.f64 h)) (*.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 l)))
(/.f64 (*.f64 d h) (*.f64 (sqrt.f64 (*.f64 l h)) l))
(/.f64 (*.f64 #s(literal 1 binary64) d) (*.f64 (/.f64 l h) (sqrt.f64 (*.f64 l h))))
(/.f64 (*.f64 d #s(literal 1 binary64)) (*.f64 (sqrt.f64 (*.f64 l h)) (/.f64 l h)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) h) l)
(/.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 l h))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) h)))
(*.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (/.f64 d l)))) (sqrt.f64 (sqrt.f64 (/.f64 d h))))
(*.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (/.f64 d h)))) (sqrt.f64 (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 d d) #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (sqrt.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
(*.f64 (sqrt.f64 (sqrt.f64 (/.f64 d l))) (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 d h) (*.f64 (/.f64 d (*.f64 l h)) d)))))
(*.f64 (sqrt.f64 (sqrt.f64 (/.f64 d h))) (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 d l) (*.f64 (/.f64 d (*.f64 l h)) d)))))
(*.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 (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 (pow.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal -1/4 binary64)) (pow.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal -1/4 binary64)))
(*.f64 (/.f64 d (sqrt.f64 h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 h) l))))
(*.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.f64 (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)) (sqrt.f64 (/.f64 d l))))
(*.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 #s(literal 1 binary64) (*.f64 l h))) d)
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(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 l (/.f64 h (*.f64 d d))) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 d (*.f64 l h)) d)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal -1/2 binary64))
(pow.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64))
(pow.f64 (*.f64 (/.f64 d (*.f64 l h)) d) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d (sqrt.f64 (*.f64 l h))))) (sqrt.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 d (/.f64 d l))) (sqrt.f64 h))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) d)) (sqrt.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 h))
(/.f64 (sqrt.f64 (*.f64 (*.f64 d d) #s(literal -1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.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 (neg.f64 (*.f64 d (/.f64 d h)))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (neg.f64 (*.f64 (neg.f64 d) d))) (sqrt.f64 (neg.f64 (*.f64 (neg.f64 h) l))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 #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 d #s(literal 1 binary64))) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 d d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 l h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (*.f64 #s(literal 1 binary64) d) (sqrt.f64 (*.f64 l h)))
(/.f64 (*.f64 d #s(literal 1 binary64)) (sqrt.f64 (*.f64 l h)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (*.f64 l (/.f64 h (*.f64 d d))))))
(/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal 1 binary64))))
(/.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)))
(sqrt.f64 (*.f64 (/.f64 d (*.f64 l h)) d))
(fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))
(exp.f64 (log.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(pow.f64 (/.f64 (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))))) (*.f64 (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))))) (neg.f64 (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)))) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (*.f64 (neg.f64 (/.f64 h l)) (*.f64 #s(literal 1/8 binary64) (*.f64 M M))) (/.f64 D d)) (/.f64 D d) #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)))) (/.f64 D d) #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (neg.f64 (/.f64 D d)) #s(literal 1 binary64))
(fma.f64 (*.f64 (neg.f64 (/.f64 h l)) (*.f64 #s(literal 1/8 binary64) (*.f64 M M))) (*.f64 D (/.f64 D (*.f64 d d))) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) #s(literal 1 binary64))
(fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (neg.f64 (/.f64 h l)) (*.f64 #s(literal 1/8 binary64) (*.f64 M M))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) (neg.f64 (*.f64 D (/.f64 D (*.f64 d d)))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (fma.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))))
(+.f64 (*.f64 (neg.f64 (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))))
(*.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
(*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 d (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64))) (sqrt.f64 (*.f64 l h)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 d (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))) (*.f64 (sqrt.f64 (*.f64 l h)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))) d) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (*.f64 l h))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) d) (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 l h))))
(/.f64 (*.f64 d (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (*.f64 l h)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))))
(fma.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (/.f64 d l)))) (sqrt.f64 (sqrt.f64 (/.f64 d h))) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (/.f64 d h)))) (sqrt.f64 (sqrt.f64 (/.f64 d l))) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (*.f64 (*.f64 d d) #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (sqrt.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (sqrt.f64 (/.f64 d l))) (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 d h) (*.f64 (/.f64 d (*.f64 l h)) d)))) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (sqrt.f64 (/.f64 d h))) (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 d l) (*.f64 (/.f64 d (*.f64 l h)) d)))) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal -1/4 binary64)) (pow.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 d (sqrt.f64 h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 h) l))) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h))) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h)))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(+.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h)))
(+.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(*.f64 (pow.f64 (*.f64 (*.f64 (/.f64 l h) l) l) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 l h) l) l) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 l) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (/.f64 l (sqrt.f64 h)) (sqrt.f64 l))
(*.f64 (sqrt.f64 (/.f64 l h)) l)
(*.f64 (sqrt.f64 l) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 l l))))
(*.f64 (sqrt.f64 l) (/.f64 l (sqrt.f64 h)))
(*.f64 l (sqrt.f64 (/.f64 l h)))
(pow.f64 (exp.f64 (log.f64 (*.f64 (*.f64 (/.f64 l h) l) l))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 l h) l) l) (*.f64 (*.f64 (/.f64 l h) l) l)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 (*.f64 (/.f64 l h) l) l) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 l h) l) l) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 l) (*.f64 l l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (*.f64 l l))) (sqrt.f64 (/.f64 h l)))
(/.f64 (sqrt.f64 (*.f64 (*.f64 l l) (neg.f64 l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 (*.f64 l l) #s(literal 1 binary64))) (sqrt.f64 (/.f64 h l)))
(/.f64 (sqrt.f64 (neg.f64 (*.f64 (*.f64 l l) l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (sqrt.f64 l) l) (sqrt.f64 h))
(/.f64 l (sqrt.f64 (/.f64 h l)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(sqrt.f64 (*.f64 (*.f64 (/.f64 l h) l) l))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 l h) l) l)) #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) (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 h) l)) (sqrt.f64 #s(literal -1 binary64)))
(/.f64 (sqrt.f64 (*.f64 l h)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(sqrt.f64 (*.f64 l h))
(exp.f64 (*.f64 (log.f64 (*.f64 l h)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) (/.f64 D d)) (/.f64 D d))
(*.f64 (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))) (*.f64 D D))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (/.f64 #s(literal 1/4 binary64) d))
(*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 d d))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 d) d)))
(*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 #s(literal 1/4 binary64) (*.f64 M M)))
(*.f64 (/.f64 D d) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) D) d))
(*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) (*.f64 D (/.f64 D (*.f64 d d))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 M M) (*.f64 D (/.f64 D (*.f64 d d)))))
(*.f64 (/.f64 (*.f64 D D) d) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d))
(*.f64 (*.f64 D D) (*.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))
(*.f64 (*.f64 M M) (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 D (*.f64 d d)))))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) M) (*.f64 D (/.f64 D (*.f64 d d)))))
(*.f64 D (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) D) (*.f64 d d)))
(*.f64 D (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) D) (/.f64 #s(literal 1 binary64) (*.f64 d d))))
(*.f64 D (*.f64 (/.f64 D d) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d)))
(*.f64 D (*.f64 D (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)))
(pow.f64 (/.f64 d (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (neg.f64 D) D) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d)) (neg.f64 d))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d)) (/.f64 d (*.f64 D D)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) #s(literal 1 binary64)) (*.f64 d d))
(/.f64 (*.f64 (/.f64 (*.f64 D D) d) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) d)
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) #s(literal -1/4 binary64))) (neg.f64 (*.f64 (neg.f64 d) d)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 (/.f64 d (*.f64 D D)) d))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d)) d)
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) #s(literal -1/4 binary64)) (*.f64 (neg.f64 d) d))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)))))
(/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) #s(literal -1/4 binary64)) (*.f64 d d)))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 (neg.f64 d) d)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)))) #s(literal -1 binary64)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (*.f64 d d) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(*.f64 (*.f64 (/.f64 d h) d) (/.f64 #s(literal 1 binary64) l))
(*.f64 (/.f64 d (*.f64 l h)) d)
(*.f64 (*.f64 d (/.f64 d h)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (neg.f64 d) d) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 h) l)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (*.f64 d d))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (*.f64 (/.f64 d h) (*.f64 (/.f64 d (*.f64 l h)) d))))
(*.f64 (/.f64 d l) (/.f64 d h))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (*.f64 (/.f64 d l) (*.f64 (/.f64 d (*.f64 l h)) d))))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (*.f64 l h)) d))
(*.f64 (/.f64 d h) (/.f64 d l))
(*.f64 d (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)))
(*.f64 d (/.f64 d (*.f64 l h)))
(pow.f64 (/.f64 l (*.f64 d (/.f64 d h))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 d (*.f64 l h)) d)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal -1 binary64))
(pow.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 d (*.f64 l h)) d) #s(literal 1 binary64))
(/.f64 (/.f64 (*.f64 d d) l) h)
(/.f64 (*.f64 d (/.f64 d (sqrt.f64 (*.f64 l h)))) (sqrt.f64 (*.f64 l h)))
(/.f64 (*.f64 (neg.f64 d) (/.f64 d l)) (neg.f64 h))
(/.f64 (*.f64 d (/.f64 d l)) h)
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) d) (sqrt.f64 (*.f64 l h)))
(/.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) l)) h)
(/.f64 (*.f64 (*.f64 d d) #s(literal -1 binary64)) (*.f64 (neg.f64 h) l))
(/.f64 (*.f64 (/.f64 d h) (neg.f64 d)) (neg.f64 l))
(/.f64 (*.f64 (/.f64 d h) #s(literal 1 binary64)) (/.f64 l d))
(/.f64 (*.f64 (*.f64 d d) #s(literal 1 binary64)) (*.f64 l h))
(/.f64 (*.f64 (/.f64 d h) d) l)
(/.f64 (neg.f64 (*.f64 d (/.f64 d h))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (neg.f64 d) d)) (neg.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (*.f64 (neg.f64 d) #s(literal 1 binary64)) (*.f64 (neg.f64 h) (/.f64 l d)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d)) (*.f64 (/.f64 h d) (neg.f64 l)))
(/.f64 (*.f64 #s(literal 1 binary64) d) (*.f64 (/.f64 h d) l))
(/.f64 (*.f64 d #s(literal 1 binary64)) (*.f64 h (/.f64 l d)))
(/.f64 (*.f64 d (/.f64 d h)) l)
(/.f64 (*.f64 (neg.f64 d) d) (*.f64 (neg.f64 h) l))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 l (/.f64 h (*.f64 d d)))))
(/.f64 (*.f64 d d) (*.f64 (neg.f64 h) (neg.f64 l)))
(/.f64 (*.f64 d d) (*.f64 l h))
(/.f64 (/.f64 d l) (/.f64 h d))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 d (/.f64 d h))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l (/.f64 h (*.f64 d d))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 l (/.f64 h (*.f64 d d))))
(/.f64 (/.f64 d h) (/.f64 l d))
(neg.f64 (/.f64 (*.f64 (neg.f64 d) d) (*.f64 l h)))
(neg.f64 (/.f64 (*.f64 d d) (*.f64 (neg.f64 h) l)))
(sqrt.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 d (*.f64 l h)) d)))
(fabs.f64 (*.f64 (/.f64 d (*.f64 l h)) d))
(exp.f64 (log.f64 (*.f64 (/.f64 d (*.f64 l h)) d)))
(exp.f64 (fma.f64 (log.f64 d) #s(literal 2 binary64) (neg.f64 (log.f64 (*.f64 l h)))))
(exp.f64 (+.f64 (neg.f64 (log.f64 (*.f64 l h))) (*.f64 (log.f64 d) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 d (*.f64 l h)) d) (*.f64 (/.f64 d (*.f64 l h)) d))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 l (/.f64 h (*.f64 d d)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d (*.f64 l h)) d)) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) D) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) M)) #s(literal 1/4 binary64))
(*.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 M M)))
(*.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (/.f64 h l)) (*.f64 #s(literal 1/8 binary64) (*.f64 M M)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 D d) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)))) (/.f64 D d))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 D (/.f64 D (*.f64 d d)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (*.f64 D (/.f64 D (*.f64 d d))))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) M) (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 D (*.f64 d d)))))
(*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (/.f64 D d))
(*.f64 (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) #s(literal 1 binary64))
(*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)))
(*.f64 (/.f64 D d) (*.f64 (/.f64 D d) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) (*.f64 D (/.f64 D (*.f64 d d))))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)) (*.f64 (/.f64 h l) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D (/.f64 D (*.f64 d d)))))
(*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (*.f64 D (/.f64 D (*.f64 d d)))))
(*.f64 (/.f64 h l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 D (/.f64 D (*.f64 d d))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))))
(/.f64 (*.f64 (/.f64 (*.f64 D D) d) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) d)
(/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (*.f64 d d))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) h) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))) l)
(/.f64 (*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (neg.f64 D)) (neg.f64 d))
(/.f64 (*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) #s(literal 1 binary64)) (/.f64 d D))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) (/.f64 (*.f64 D D) d)) d)
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l)) (*.f64 D D)) (*.f64 d d))
(/.f64 (*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) D) d)
(/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))) (/.f64 d D))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 M M))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) (/.f64 h l)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) (*.f64 #s(literal 1/4 binary64) M))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 h l))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) M) #s(literal 1/4 binary64))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 M M)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) (*.f64 (/.f64 h l) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) M))
(*.f64 (/.f64 h l) (*.f64 #s(literal 1/8 binary64) (*.f64 M M)))
(*.f64 (*.f64 M M) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) M) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 #s(literal 1/8 binary64) (*.f64 M M))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) l)
(/.f64 (*.f64 (neg.f64 h) (*.f64 #s(literal 1/8 binary64) (*.f64 M M))) (neg.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/8 binary64) (*.f64 M M))) (/.f64 l h))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 M M))) l)
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) (*.f64 #s(literal 1/2 binary64) h)) l)

eval620.0ms (3.1%)

Memory
-112.1MiB live, 643.8MiB allocated
Compiler

Compiled 67 144 to 2 595 computations (96.1% saved)

prune364.0ms (1.8%)

Memory
-35.0MiB live, 567.2MiB allocated
Pruning

46 alts after pruning (45 fresh and 1 done)

PrunedKeptTotal
New1 918381 956
Fresh20727
Picked415
Done000
Total1 942461 988
Accuracy
93.9%
Counts
1 988 → 46
Alt Table
Click to see full alt table
StatusAccuracyProgram
12.2%
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h d) (*.f64 l (sqrt.f64 (*.f64 l h))))) (/.f64 d (sqrt.f64 (*.f64 l h))))
▶29.5%
(/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h)))
▶29.9%
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
28.9%
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
70.2%
(*.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
48.4%
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
72.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 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (*.f64 M D) h)))))
47.4%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))))
43.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) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
47.3%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))) (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))))
▶74.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 #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) D) M) (/.f64 #s(literal 1 binary64) h)))))
61.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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 D d)))))
35.1%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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.9%
(*.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 (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))))
13.2%
#s(approx (+ (* (* (sqrt (/ (* d d) (* h l))) (/ h l)) (* -1/2 (/ (* (* D D) (* (* M M) 1/4)) (* d d)))) (sqrt (/ (* d d) (* h l)))) (/.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))
23.3%
#s(approx (+ (* (* (sqrt (/ (* d d) (* h l))) (/ h l)) (* -1/2 (/ (* (* D D) (* (* M M) 1/4)) (* d d)))) (sqrt (/ (* d d) (* h l)))) (*.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)))) (neg.f64 d)))
31.3%
#s(approx (+ (* (* (sqrt (/ (* d d) (* h l))) (/ h l)) (* -1/2 (/ (* (* D D) (* (* M M) 1/4)) (* d d)))) (sqrt (/ (* d d) (* h l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
18.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
30.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) (*.f64 l l)))
26.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) M) (*.f64 M (*.f64 (sqrt.f64 (*.f64 l h)) (/.f64 (*.f64 D D) d))) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) (*.f64 l l)))
28.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (fma.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d) (*.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) l) l))
23.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
23.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 d (sqrt.f64 h)) (sqrt.f64 l)))
43.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))))
22.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
17.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 (/.f64 d h) d)) (sqrt.f64 l)))
19.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 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
21.1%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d)))))
24.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 l h))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)) h)) (*.f64 l l)))
11.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)))
9.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)) (*.f64 l l)))
10.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (neg.f64 d) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 l l)))
▶22.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 d (sqrt.f64 (*.f64 l h))))
22.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
▶31.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))))
2.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 (neg.f64 h))) d))
22.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d))
17.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 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
24.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)) d))
43.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 l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
20.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 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d))
22.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
30.0%
#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 (*.f64 l h)) d)))
42.1%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
17.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (exp.f64 (log.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
Compiler

Compiled 2 428 to 1 542 computations (36.5% saved)

simplify140.0ms (0.7%)

Memory
21.6MiB live, 136.0MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
cost-diff0
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d)))
cost-diff0
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
cost-diff256
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))
cost-diff0
(/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h)))
cost-diff128
(neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)))
cost-diff128
(*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d)
cost-diff256
(fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64))
cost-diff0
(sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))
cost-diff0
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))
cost-diff0
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))))
cost-diff384
(/.f64 l (*.f64 d (/.f64 d 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-diff384
(-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h))))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff1088
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
cost-diff5824
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Rules
6 584×lower-*.f32
6 534×lower-*.f64
2 786×lower-/.f32
2 756×lower-/.f64
1 902×lower-neg.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
081633
0137639
1276599
2892599
33514599
45436599
08093597
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 #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) D) M) (/.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 #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) D) M) (/.f64 #s(literal 1 binary64) h))))
(*.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) D) M) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) 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 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(/.f64 #s(literal 1/2 binary64) d)
(/.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
#s(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 l (*.f64 d (/.f64 d h))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))
#s(literal 1 binary64)
(sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))
(/.f64 l (*.f64 d (/.f64 d h)))
l
(*.f64 d (/.f64 d h))
d
(/.f64 d h)
h
(/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h)))
(*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d)
(fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64))
(*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))))
(neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) M)
(*.f64 #s(literal 1/4 binary64) D)
#s(literal 1/4 binary64)
D
M
(*.f64 l d)
l
d
(*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 D (/.f64 #s(literal 1/2 binary64) d))
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
h
#s(literal 1 binary64)
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
(/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(*.f64 D D)
D
(*.f64 (*.f64 M M) #s(literal 1/4 binary64))
(*.f64 M M)
M
#s(literal 1/4 binary64)
(*.f64 d d)
d
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
(sqrt.f64 (neg.f64 l))
(neg.f64 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 #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) D) M) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) h) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 (*.f64 d d) l)) #s(literal 1 binary64)) (*.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))) (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 #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) D) M) (/.f64 #s(literal 1 binary64) h))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) h) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 (*.f64 d d) l)) #s(literal 1 binary64))
(*.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) D) M) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 h (*.f64 D (*.f64 (/.f64 M (*.f64 l d)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) M) (/.f64 D d)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l)
(*.f64 (*.f64 (/.f64 M (*.f64 l d)) D) #s(literal 1/4 binary64))
(*.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)
#s(literal 1/2 binary64)
(*.f64 D #s(literal 1/2 binary64))
D
(/.f64 M d)
M
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) h) (*.f64 M D))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(/.f64 #s(literal 1/2 binary64) d)
(/.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
#s(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 l (*.f64 d (/.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 l (*.f64 d d)) h))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l (*.f64 d d)) h)))
#s(literal 1 binary64)
(sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))
(sqrt.f64 (*.f64 (/.f64 l (*.f64 d d)) h))
(/.f64 l (*.f64 d (/.f64 d h)))
(*.f64 (/.f64 l (*.f64 d d)) h)
l
(*.f64 d (/.f64 d h))
(*.f64 (/.f64 d h) d)
d
(/.f64 d h)
h
(/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h)))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) h) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 (*.f64 d d) l)) d d) (sqrt.f64 (*.f64 l h)))
(*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d)
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) h) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 (*.f64 d d) l)) d d)
(fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) h) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 (*.f64 d d) l)) #s(literal 1 binary64))
(*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 M (*.f64 l d)) D)) (*.f64 (*.f64 #s(literal 1/4 binary64) M) (/.f64 D d)))
(neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)))
(*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 M (*.f64 l d))) D)
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))
(*.f64 (*.f64 (/.f64 M (*.f64 l d)) D) #s(literal 1/4 binary64))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) M)
(*.f64 #s(literal 1/4 binary64) D)
#s(literal 1/4 binary64)
D
M
(*.f64 l d)
l
d
(*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 D (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
h
#s(literal 1 binary64)
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 d h))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) h) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 (*.f64 d d) l)) #s(literal 1 binary64)))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d)))
(*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) h) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 (*.f64 d d) l)) #s(literal 1 binary64)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(*.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) h) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 (*.f64 d d) l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) h) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 (*.f64 d d) l)) #s(literal 1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(*.f64 (/.f64 h l) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
(/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))
(*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D) (/.f64 D (*.f64 d d)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))
(*.f64 D D)
D
(*.f64 (*.f64 M M) #s(literal 1/4 binary64))
(*.f64 M M)
M
#s(literal 1/4 binary64)
(*.f64 d d)
d
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
(sqrt.f64 (neg.f64 l))
(neg.f64 l)

localize274.0ms (1.4%)

Memory
6.7MiB live, 405.9MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy4.1400522614882815
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))
accuracy5.540895981001919
(sqrt.f64 (/.f64 d h))
accuracy7.26552448127423
(/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))
accuracy7.503318314394868
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
accuracy1.427619693488844
(*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d)
accuracy1.7432817829773937
(*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
accuracy4.4581845864123055
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))
accuracy7.609300552300038
(sqrt.f64 (*.f64 l h))
accuracy0.11328125
(*.f64 d (/.f64 d h))
accuracy2.9308040329300744
(/.f64 l (*.f64 d (/.f64 d h)))
accuracy11.360805127875292
(sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))
accuracy17.05361745930318
#s(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 l (*.f64 d (/.f64 d h))))))
accuracy0
(*.f64 l h)
accuracy0.1328125
(/.f64 d (sqrt.f64 (*.f64 l h)))
accuracy7.609300552300038
(sqrt.f64 (*.f64 l h))
accuracy33.612692765647566
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
accuracy2.7329955333077915
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
accuracy3.2244930452786065
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
accuracy5.540895981001919
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy7.843305121920059
(sqrt.f64 (/.f64 d l))
Samples
108.0ms142×0valid
78.0ms114×0invalid
Compiler

Compiled 644 to 78 computations (87.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 145.0ms
ival-mult: 73.0ms (50.3% of total)
ival-div: 32.0ms (22.1% of total)
ival-sqrt: 15.0ms (10.3% of total)
ival-pow: 11.0ms (7.6% of total)
ival-pow2: 6.0ms (4.1% of total)
ival-neg: 3.0ms (2.1% of total)
ival-add: 2.0ms (1.4% of total)
ival-sub: 2.0ms (1.4% of total)
exact: 1.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series214.0ms (1.1%)

Memory
-1.7MiB live, 185.6MiB allocated
Counts
28 → 1 164
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 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 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 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())
#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (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 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())
#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())
#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())
Outputs
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.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 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 (* -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 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 (* -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 (* -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 (* -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 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 (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 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/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 #s(approx (* (* (pow (/ d h) (/ 1 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 (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/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 #s(approx (* (* (pow (/ d h) (/ 1 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 (* 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 (* 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 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 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 (* 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 (* 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 (* 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 (* 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 (* 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 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 (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 (* -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 (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 (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (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 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 (* 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 (* 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 (* 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 (* 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 (* 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 (/ (* h l) (pow d 2)) (taylor 0 l) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 l) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 l) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 l) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf l) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf l) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf l) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf l) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf l) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf l) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf l) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf l) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 d) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 d) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 d) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 d) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf d) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf d) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf d) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf d) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf d) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf d) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf d) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf d) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 h) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 h) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 h) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 h) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf h) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf h) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf h) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf h) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf h) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf h) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf h) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf h) (#s(alt (/.f64 l (*.f64 d (/.f64 d h))) (patch (/.f64 l (*.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (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 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(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 l (*.f64 d (/.f64 d h)))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt d (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2)))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2)))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2)))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2)))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2)))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2)))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt d (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2)))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2)))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2)))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2)))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2)))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2)))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) d)) (* d l)) l) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) d)) (* d l)) l) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) d)) (* d l)) l) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt d (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt d (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) d) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) d) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) d) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt d (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* d (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* d (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* d (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt d (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (- (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) 1))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (- (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) 1))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (- (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) 1))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt d (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* d l))) (/ d h))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* d l))) (/ d h))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* d l))) (/ d h))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (/ d h)) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* d l)))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (/ d h)) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* d l)))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (/ d h)) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* d l)))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (patch (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (patch (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 l) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 h) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 h) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.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 (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt h))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l) (taylor 0 l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l) (taylor 0 l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l) (taylor 0 l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.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) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 d) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 d) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 d) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 d) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf d) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf d) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf d) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf d) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf d) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf d) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf d) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf d) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 h) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 h) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 h) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 h) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf h) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf h) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf h) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf h) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf h) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf h) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf h) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf h) (#s(alt (*.f64 d (/.f64 d h)) (patch (*.f64 d (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 D) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 D) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 D) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 D) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf D) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf D) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf D) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf D) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf D) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf D) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf D) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf D) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 M) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 M) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 M) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 M) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf M) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf M) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf M) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf M) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf M) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf M) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf M) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf M) (#s(alt (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (patch (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) (patch (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d 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 h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
Calls

291 calls:

TimeVariablePointExpression
77.0ms
d
@0
(neg (/ (* (* 1/4 D) M) (* l d)))
13.0ms
d
@0
(+ (* (* (neg (/ (* (* 1/4 D) M) (* l d))) (* M (* D (/ 1/2 d)))) h) 1)
4.0ms
d
@inf
(/ 1 (sqrt (/ l (* d (/ d h)))))
1.0ms
d
@0
(* (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (sqrt (neg d)))
1.0ms
D
@0
(neg (/ (* (* 1/4 D) M) (* l d)))

simplify260.0ms (1.3%)

Memory
18.8MiB live, 301.7MiB allocated
Algorithm
1×egg-herbie
Rules
7 442×lower-*.f64
7 442×lower-*.f32
5 260×lower-fma.f64
5 260×lower-fma.f32
1 844×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
037817797
1116217291
2432317214
3643017193
0843116773
Stop Event
1×iter limit
1×node limit
Counts
1 164 → 1 157
Calls
Call 1
Inputs
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(/ (* h l) (pow d 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* 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)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (+ (* -1/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 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
d
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2))))
d
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) d)) (* d l)) l)
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) d)) (* d l)) l)
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) d)) (* d l)) l)
d
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
d
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) d)
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) d)
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) d)
d
(* d (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))))
(* d (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))))
(* d (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))))
d
(* -1 (* d (- (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) 1)))
(* -1 (* d (- (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) 1)))
(* -1 (* d (- (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) 1)))
d
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* d l))) (/ d h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* d l))) (/ d h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* d l))) (/ d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(* -1 (* h (+ (* -1 (/ d h)) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* d l))))))
(* -1 (* h (+ (* -1 (/ d h)) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* d l))))))
(* -1 (* h (+ (* -1 (/ d h)) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* d l))))))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* D M) (* d l)))
(* -1/4 (/ (* 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)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (+ (* -1/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 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt h)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(sqrt (/ d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(sqrt (/ d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(/ (pow d 2) h)
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (* (pow D 2) (pow M 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
Outputs
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(/ (- (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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(/ (- 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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* 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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* 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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.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))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (* (* 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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (/.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 D D)) (*.f64 d d)))) 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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (/.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 D D)) (*.f64 d d)))) 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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (/.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 D D)) (*.f64 d d)))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 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 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 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 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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) (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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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)) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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)
(+ (* -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))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -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/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))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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/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))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.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))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* -1 (* (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))
(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))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* -1 (* (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)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(/ (* h l) (pow d 2))
(*.f64 (/.f64 l (*.f64 d d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.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))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (* (* 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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (/.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 D D)) (*.f64 d d)))) 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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (/.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 D D)) (*.f64 d d)))) 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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (/.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 D D)) (*.f64 d d)))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 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 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 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 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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) (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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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)) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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)
(+ (* -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))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -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/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))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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/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))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.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))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1 (* (/ 1 d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d))
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(/ (+ 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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* 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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* -1 (* 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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1 (* 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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1 (* 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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
d
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 D D))) (*.f64 D D))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* d l))) (/ d (pow D 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 D D))) (*.f64 D D))
d
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 M M))) (*.f64 M M))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* d l))) (/ d (pow M 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 M M))) (*.f64 M M))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) d)) (* d l)) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) d)) (*.f64 l d)) l)
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) d)) (* d l)) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) d)) (*.f64 l d)) l)
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) d)) (* d l)) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) d)) (*.f64 l d)) l)
d
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
d
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) l)) (*.f64 d d)) d)
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) l)) (*.f64 d d)) d)
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) l)) (*.f64 d d)) d)
d
(* d (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))))
(fma.f64 (*.f64 d #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (*.f64 l (*.f64 d d))) d)
(* d (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))))
(fma.f64 (*.f64 d #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (*.f64 l (*.f64 d d))) d)
(* d (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))))
(fma.f64 (*.f64 d #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (*.f64 l (*.f64 d d))) d)
d
(* -1 (* d (- (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) 1)))
(fma.f64 (*.f64 d #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (*.f64 l (*.f64 d d))) d)
(* -1 (* d (- (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) 1)))
(fma.f64 (*.f64 d #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (*.f64 l (*.f64 d d))) d)
(* -1 (* d (- (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) 1)))
(fma.f64 (*.f64 d #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (*.f64 l (*.f64 d d))) d)
d
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(+ d (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)) d)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* d l))) (/ d h)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M (/.f64 M (*.f64 l d))) (/.f64 d h)) h)
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* d l))) (/ d h)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M (/.f64 M (*.f64 l d))) (/.f64 d h)) h)
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* d l))) (/ d h)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M (/.f64 M (*.f64 l d))) (/.f64 d h)) h)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* d l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)))
(* -1 (* h (+ (* -1 (/ d h)) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* d l))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M (/.f64 M (*.f64 l d))) (/.f64 d h)) h)
(* -1 (* h (+ (* -1 (/ d h)) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* d l))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M (/.f64 M (*.f64 l d))) (/.f64 d h)) h)
(* -1 (* h (+ (* -1 (/ d h)) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* d l))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M (/.f64 M (*.f64 l d))) (/.f64 d h)) h)
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* -1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal -1/4 binary64) D) (/.f64 M (*.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 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/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))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.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))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.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/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))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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)
(+ (* -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))
(* 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/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 (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))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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)
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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)
(/ (+ (* -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 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 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 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 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 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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
#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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* 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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* -1 (* 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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1 (* 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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1 (* 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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(/ (+ 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 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 h (*.f64 l (*.f64 d d))) (*.f64 D D)) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 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 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 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 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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) (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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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)) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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 D D)) (/.f64 (*.f64 M M) 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)
(+ (* -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))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -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/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))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.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))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.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/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))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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)) (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))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (* 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 #s(literal -1/8 binary64) (*.f64 D D)) (*.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)))))
(* -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 #s(literal -1/8 binary64) (*.f64 D D)) (*.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)))))
(* -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 #s(literal -1/8 binary64) (*.f64 D D)) (*.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 (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(/.f64 (fma.f64 (*.f64 (sqrt.f64 h) (sqrt.f64 #s(literal -1 binary64))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 M (/.f64 M (*.f64 l d))))) (sqrt.f64 (*.f64 (*.f64 h h) h)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(/.f64 (fma.f64 (*.f64 (sqrt.f64 h) (sqrt.f64 #s(literal -1 binary64))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 M (/.f64 M (*.f64 l d))))) (sqrt.f64 (*.f64 (*.f64 h h) h)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(/.f64 (fma.f64 (*.f64 (sqrt.f64 h) (sqrt.f64 #s(literal -1 binary64))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 M (/.f64 M (*.f64 l d))))) (sqrt.f64 (*.f64 (*.f64 h h) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(*.f64 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h h) h))) (sqrt.f64 #s(literal -1 binary64))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 M (/.f64 M (*.f64 l d))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(*.f64 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h h) h))) (sqrt.f64 #s(literal -1 binary64))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 M (/.f64 M (*.f64 l d))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(*.f64 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h h) h))) (sqrt.f64 #s(literal -1 binary64))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 M (/.f64 M (*.f64 l d))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt h)))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (*.f64 M M)) (*.f64 D D)) (*.f64 l d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 D D)) (*.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (*.f64 M (/.f64 M (*.f64 l d))))) #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h h) h))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 D D)) (*.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (*.f64 M (/.f64 M (*.f64 l d))))) #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h h) h))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 D D)) (*.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (*.f64 M (/.f64 M (*.f64 l d))))) #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h h) h))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (/.f64 (*.f64 D D) d)) (*.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal -1 binary64))) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) l)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (/.f64 (*.f64 D D) d)) (*.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal -1 binary64))) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) l)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (/.f64 (*.f64 D D) d)) (*.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal -1 binary64))) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) l)
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 M (/.f64 M (*.f64 l d)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (*.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 M (/.f64 M (*.f64 l d)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (*.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 M (/.f64 M (*.f64 l d)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (*.f64 D D))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 M (/.f64 M (*.f64 l d)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (*.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 M (/.f64 M (*.f64 l d)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (*.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 M (/.f64 M (*.f64 l d)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (*.f64 D D))) (*.f64 D D))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) D) (*.f64 l d)) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (*.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) D) (*.f64 l d)) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (*.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) D) (*.f64 l d)) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (*.f64 M M))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) D) (*.f64 l d)) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (*.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) D) (*.f64 l d)) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (*.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) D) (*.f64 l d)) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (*.f64 M M))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (/.f64 (*.f64 D D) l)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (/.f64 (*.f64 D D) l)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (/.f64 (*.f64 D D) l)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) d)
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l (*.f64 d d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l (*.f64 d d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l (*.f64 d d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(*.f64 (neg.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l (*.f64 d d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l (*.f64 d d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l (*.f64 d d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64)))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (*.f64 h d))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (*.f64 h d))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (*.f64 h d))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) h))) (sqrt.f64 (/.f64 d (*.f64 (*.f64 h h) h)))) h)
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) h))) (sqrt.f64 (/.f64 d (*.f64 (*.f64 h h) h)))) h)
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) h))) (sqrt.f64 (/.f64 d (*.f64 (*.f64 h h) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) h))) (sqrt.f64 (/.f64 d (*.f64 (*.f64 h h) h)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) h))) (sqrt.f64 (/.f64 d (*.f64 (*.f64 h h) h)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) h))) (sqrt.f64 (/.f64 d (*.f64 (*.f64 h h) h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 M M)) (*.f64 l (sqrt.f64 (/.f64 d h)))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 M M)) (*.f64 l (sqrt.f64 (/.f64 d h)))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 M M)) (*.f64 l (sqrt.f64 (/.f64 d h)))) l)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (*.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (*.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (*.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))) d)
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))) d)
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))) d)
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) d)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(/ (pow d 2) h)
(*.f64 d (/.f64 d h))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(* 1/4 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.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/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 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)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 1/4 (* (pow D 2) (pow M 2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) M) M)
(* 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/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/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/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/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/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/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/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/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)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))

rewrite259.0ms (1.3%)

Memory
-22.6MiB live, 287.2MiB allocated
Rules
6 530×lower-*.f32
6 484×lower-*.f64
3 682×lower-/.f32
3 652×lower-/.f64
2 242×lower-pow.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
079405
0132396
1437348
23245338
09488332
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
28 → 999
Calls
Call 1
Inputs
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(-.f64 #s(literal 1 binary64) (*.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) D) M) (/.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)))
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
(/.f64 l (*.f64 d (/.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 l (*.f64 d (/.f64 d h))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))
(sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))
(fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64))
(*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d)
(neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)))
(/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(sqrt.f64 (/.f64 d l))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(*.f64 d (/.f64 d h))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))
(*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))
(sqrt.f64 (/.f64 d h))
Outputs
(*.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 d #s(literal 1 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 d h)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d))
(*.f64 (sqrt.f64 d) (/.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 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 h d) #s(literal -1/4 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 #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 (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 (/.f64 d h) #s(literal 1/2 binary64))
(/.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 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 d) (sqrt.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 #s(literal 1 binary64) (sqrt.f64 (/.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 (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 (/.f64 d h)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 #s(literal 1/2 binary64) d)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) M) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal -1 binary64)) (*.f64 M h))
(*.f64 (/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal -1 binary64)) (neg.f64 h))
(*.f64 (/.f64 (*.f64 M D) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 M #s(literal 1 binary64)) (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (*.f64 M h))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) d) #s(literal 1 binary64)) (/.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 M h) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 (*.f64 (neg.f64 M) D) (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) h)))
(*.f64 (*.f64 M D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) h))
(*.f64 (*.f64 M D) (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)
(*.f64 M (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) h))
(*.f64 M (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (*.f64 M h))
(*.f64 D (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M h)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (*.f64 M D) h))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 D (*.f64 M h)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) h)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))
(*.f64 h (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (/.f64 #s(literal 1 binary64) h)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 M h)) d)
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 M) D) (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) (/.f64 d h))
(/.f64 (*.f64 (*.f64 (neg.f64 M) D) (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal -1 binary64) h))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(/.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))
(/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal 1 binary64) h))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))
(neg.f64 (/.f64 (*.f64 (*.f64 (neg.f64 M) D) (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 1 binary64) h)))
(neg.f64 (/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal -1 binary64) h)))
(exp.f64 (-.f64 (log.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (neg.f64 (log.f64 h))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))) #s(literal -1 binary64)))
#s(literal 1/2 binary64)
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))))) (*.f64 (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))))) (neg.f64 (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64))) (neg.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64)) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d))) h) (/.f64 #s(literal 1 binary64) l) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (*.f64 M h) #s(literal 1 binary64))
(fma.f64 (*.f64 h (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) M)) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64))
(fma.f64 (*.f64 h (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64))
(fma.f64 (neg.f64 (/.f64 h l)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) M) (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) h) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (/.f64 h l) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d))) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) (neg.f64 (/.f64 h l)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) #s(literal 1 binary64))
(fma.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) h) #s(literal 1 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d)))) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64))
(fma.f64 h (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 h (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) #s(literal 1 binary64))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))
(+.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) 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 (sqrt.f64 (*.f64 l h))))
(*.f64 (pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal -1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 l d) (neg.f64 d)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 l (*.f64 d d)) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (pow.f64 (/.f64 (/.f64 l d) d) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (pow.f64 (/.f64 (/.f64 l d) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 d h)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 l (*.f64 (neg.f64 d) (/.f64 d h))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)) (/.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 (pow.f64 (*.f64 (/.f64 l (*.f64 d d)) h) #s(literal -1/4 binary64)) (pow.f64 (*.f64 (/.f64 l (*.f64 d d)) h) #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 (/.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)) (pow.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (/.f64 d (sqrt.f64 h)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d h) l)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.f64 (sqrt.f64 d) (pow.f64 (/.f64 (/.f64 d h) l) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)))
(*.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 (neg.f64 l))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 d) (/.f64 d h))) #s(literal -1/2 binary64)))
(*.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 (/.f64 d (sqrt.f64 h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))))
(*.f64 #s(literal -1 binary64) (/.f64 d (neg.f64 (sqrt.f64 (*.f64 l h)))))
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.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 h) (/.f64 d h)) (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d l) (/.f64 d l)) (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) (/.f64 (sqrt.f64 (*.f64 l h)) d)) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (*.f64 (/.f64 l (*.f64 d d)) h) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.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))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 l (*.f64 d d)) h) #s(literal -1/2 binary64))
(/.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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) #s(literal 1 binary64))) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (*.f64 (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 h) l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d l))) (sqrt.f64 h))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (*.f64 d #s(literal 1 binary64)) (sqrt.f64 (*.f64 l h)))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))
(/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l))
(/.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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))))
(/.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))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
(neg.f64 (/.f64 d (neg.f64 (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 d (neg.f64 (sqrt.f64 (*.f64 l h)))))
(exp.f64 (neg.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 l (*.f64 d 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 (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 (sqrt.f64 (*.f64 l h)) d)) #s(literal -1 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 l))
(pow.f64 (exp.f64 (log.f64 (*.f64 l h))) #s(literal 1/2 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))
(sqrt.f64 (*.f64 l h))
(exp.f64 (*.f64 (log.f64 (*.f64 l h)) #s(literal 1/2 binary64)))
(*.f64 l h)
(*.f64 h l)
(*.f64 (/.f64 (/.f64 l d) (neg.f64 d)) (neg.f64 h))
(*.f64 (/.f64 l (*.f64 d d)) h)
(*.f64 (/.f64 (/.f64 l d) d) h)
(*.f64 (/.f64 (/.f64 l d) #s(literal 1 binary64)) (/.f64 h d))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h) (pow.f64 (/.f64 #s(literal 1 binary64) l) #s(literal -1 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h) l)
(*.f64 (/.f64 #s(literal 1 binary64) d) (pow.f64 (/.f64 (/.f64 d h) l) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal -1 binary64)))
(*.f64 (/.f64 l d) (/.f64 h d))
(*.f64 (/.f64 h d) (/.f64 l d))
(*.f64 #s(literal -1 binary64) (/.f64 l (*.f64 (neg.f64 d) (/.f64 d h))))
(*.f64 (neg.f64 l) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 d) (/.f64 d h))))
(*.f64 l (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 l (*.f64 d d)) h))
(pow.f64 (/.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 (neg.f64 d) (/.f64 d h))) (*.f64 (*.f64 (neg.f64 d) (/.f64 d h)) l)) (*.f64 (*.f64 (neg.f64 d) (/.f64 d h)) (*.f64 (neg.f64 d) (/.f64 d h))))
(/.f64 (/.f64 (/.f64 l d) d) (/.f64 #s(literal 1 binary64) h))
(/.f64 (/.f64 l (/.f64 d h)) d)
(/.f64 (*.f64 l #s(literal 1 binary64)) (*.f64 (/.f64 d h) d))
(/.f64 (neg.f64 (/.f64 l d)) (neg.f64 (/.f64 d h)))
(/.f64 (neg.f64 (neg.f64 l)) (neg.f64 (*.f64 (neg.f64 d) (/.f64 d h))))
(/.f64 (/.f64 l d) (/.f64 d h))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 d d) (*.f64 l h))))
(/.f64 (neg.f64 l) (*.f64 (neg.f64 d) (/.f64 d h)))
(/.f64 l (*.f64 (/.f64 d h) d))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 l h)))
(neg.f64 (/.f64 (neg.f64 l) (*.f64 (/.f64 d h) d)))
(neg.f64 (/.f64 l (*.f64 (neg.f64 d) (/.f64 d h))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (neg.f64 d) (/.f64 d h))) (/.f64 l (*.f64 (neg.f64 d) (/.f64 d h))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #s(literal -1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 (pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal -1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 l d) (neg.f64 d)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 l (*.f64 d d)) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (pow.f64 (/.f64 (/.f64 l d) d) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (pow.f64 (/.f64 (/.f64 l d) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 d h)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 l (*.f64 (neg.f64 d) (/.f64 d h))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)) (/.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 (pow.f64 (*.f64 (/.f64 l (*.f64 d d)) h) #s(literal -1/4 binary64)) (pow.f64 (*.f64 (/.f64 l (*.f64 d d)) h) #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 (/.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)) (pow.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (/.f64 d (sqrt.f64 h)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d h) l)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.f64 (sqrt.f64 d) (pow.f64 (/.f64 (/.f64 d h) l) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)))
(*.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 (neg.f64 l))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 d) (/.f64 d h))) #s(literal -1/2 binary64)))
(*.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 (/.f64 d (sqrt.f64 h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))))
(*.f64 #s(literal -1 binary64) (/.f64 d (neg.f64 (sqrt.f64 (*.f64 l h)))))
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.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 h) (/.f64 d h)) (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d l) (/.f64 d l)) (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) (/.f64 (sqrt.f64 (*.f64 l h)) d)) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (*.f64 (/.f64 l (*.f64 d d)) h) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.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))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 l (*.f64 d d)) h) #s(literal -1/2 binary64))
(/.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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) #s(literal 1 binary64))) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (*.f64 (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 h) l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d l))) (sqrt.f64 h))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (*.f64 d #s(literal 1 binary64)) (sqrt.f64 (*.f64 l h)))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))
(/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l))
(/.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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))))
(/.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))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
(neg.f64 (/.f64 d (neg.f64 (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 d (neg.f64 (sqrt.f64 (*.f64 l h)))))
(exp.f64 (neg.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 l (*.f64 d 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 (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 (sqrt.f64 (*.f64 l h)) d)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 (/.f64 l d) (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(*.f64 (sqrt.f64 (/.f64 l (*.f64 d d))) (sqrt.f64 h))
(*.f64 (sqrt.f64 (/.f64 (/.f64 l d) d)) (sqrt.f64 h))
(*.f64 (sqrt.f64 (/.f64 (/.f64 l d) #s(literal 1 binary64))) (sqrt.f64 (/.f64 h d)))
(*.f64 (pow.f64 (/.f64 (/.f64 l d) (neg.f64 d)) #s(literal 1/2 binary64)) (sqrt.f64 (neg.f64 h)))
(*.f64 (pow.f64 (/.f64 l (*.f64 d d)) #s(literal 1/2 binary64)) (sqrt.f64 h))
(*.f64 (pow.f64 (/.f64 (/.f64 l d) d) #s(literal 1/2 binary64)) (sqrt.f64 h))
(*.f64 (pow.f64 (/.f64 (/.f64 l d) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 h d)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (/.f64 (sqrt.f64 (*.f64 l h)) d))
(*.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 (sqrt.f64 (/.f64 l d)) (sqrt.f64 (/.f64 h d)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h)) (sqrt.f64 l))
(*.f64 (sqrt.f64 l) (/.f64 (sqrt.f64 h) d))
(*.f64 (sqrt.f64 l) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 l (*.f64 (neg.f64 d) (/.f64 d h)))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 l (*.f64 (neg.f64 d) (/.f64 d h))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 d) (/.f64 d h)))))
(*.f64 (sqrt.f64 (neg.f64 l)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 d) (/.f64 d h))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (*.f64 l h)) (/.f64 #s(literal 1 binary64) d))
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d))
(pow.f64 (exp.f64 (log.f64 (*.f64 (/.f64 l (*.f64 d d)) h))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 l (*.f64 d d)) h) (*.f64 (/.f64 l (*.f64 d 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 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal -1/2 binary64))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64))
(pow.f64 (*.f64 (/.f64 l (*.f64 d d)) h) #s(literal 1/2 binary64))
(pow.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (/.f64 l (/.f64 d h))) (sqrt.f64 d))
(/.f64 (sqrt.f64 (*.f64 l #s(literal 1 binary64))) (/.f64 d (sqrt.f64 h)))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 (*.f64 (neg.f64 d) (/.f64 d h)))))
(/.f64 (sqrt.f64 (neg.f64 (/.f64 l d))) (sqrt.f64 (neg.f64 (/.f64 d h))))
(/.f64 (sqrt.f64 (/.f64 (/.f64 l d) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(/.f64 (neg.f64 (sqrt.f64 l)) (neg.f64 (/.f64 d (sqrt.f64 h))))
(/.f64 (sqrt.f64 (/.f64 l d)) (sqrt.f64 (/.f64 d h)))
(/.f64 (sqrt.f64 l) (*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 h))))
(/.f64 (sqrt.f64 l) (/.f64 d (sqrt.f64 h)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 l h)))))
(/.f64 (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d)) #s(literal -1 binary64))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 d))
(/.f64 (sqrt.f64 (neg.f64 l)) (/.f64 d (sqrt.f64 (neg.f64 h))))
(/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))))
(sqrt.f64 (*.f64 (/.f64 l (*.f64 d d)) h))
(exp.f64 (neg.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d)) #s(literal -1 binary64))))
(exp.f64 (neg.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 (neg.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 (neg.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #s(literal 1/2 binary64))))
(exp.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))))) (*.f64 (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))))) (neg.f64 (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64))) (neg.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64)) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d))) h) (/.f64 #s(literal 1 binary64) l) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (*.f64 M h) #s(literal 1 binary64))
(fma.f64 (*.f64 h (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) M)) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64))
(fma.f64 (*.f64 h (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64))
(fma.f64 (neg.f64 (/.f64 h l)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) M) (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) h) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (/.f64 h l) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d))) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) (neg.f64 (/.f64 h l)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) #s(literal 1 binary64))
(fma.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) h) #s(literal 1 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d)))) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64))
(fma.f64 h (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 h (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) #s(literal 1 binary64))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))
(+.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))
(*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d)
(*.f64 d (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))
(/.f64 (*.f64 d (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64))) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)))
(/.f64 (*.f64 d (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64)) d) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) d) (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) d (*.f64 #s(literal 1 binary64) d))
(fma.f64 #s(literal 1 binary64) d (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) d))
(fma.f64 d (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 d #s(literal 1 binary64)))
(fma.f64 d #s(literal 1 binary64) (*.f64 d (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(+.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) d) (*.f64 #s(literal 1 binary64) d))
(+.f64 (*.f64 d (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))) (*.f64 d #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) d) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) d))
(+.f64 (*.f64 d #s(literal 1 binary64)) (*.f64 d (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) D) l)) (/.f64 M d))
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 M (*.f64 l d)))
(*.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) D) l)) (/.f64 M d))
(*.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) D)) (/.f64 M (*.f64 l d)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) D) l) (neg.f64 (/.f64 M d)))
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 l d)))
(*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d) (/.f64 #s(literal 1 binary64) l))
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d))))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 l) d)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 (neg.f64 l) d)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (neg.f64 (/.f64 M (*.f64 l d))))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) (*.f64 (neg.f64 l) d)))
(*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) #s(literal -1 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M d)) (neg.f64 (/.f64 #s(literal 1 binary64) l)))
(*.f64 M (/.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (neg.f64 l) d)))
(pow.f64 (/.f64 (*.f64 l d) (*.f64 #s(literal -1/4 binary64) (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (neg.f64 l) d) (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) #s(literal -1 binary64))
(pow.f64 (neg.f64 (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d)) #s(literal -1 binary64))
(/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) d)
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (/.f64 (*.f64 #s(literal 1/4 binary64) D) l))) d)
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 M D))) (*.f64 (neg.f64 l) d))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))) (+.f64 #s(literal 0 binary64) (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)))) (+.f64 #s(literal 0 binary64) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D))))))
(/.f64 (neg.f64 (*.f64 M (/.f64 (*.f64 #s(literal 1/4 binary64) D) l))) d)
(/.f64 (neg.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D))) (*.f64 (neg.f64 l) d))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d)) (neg.f64 l))
(/.f64 (*.f64 M (/.f64 (*.f64 #s(literal 1/4 binary64) D) l)) (neg.f64 d))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (neg.f64 (*.f64 (neg.f64 l) d)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))
(/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d) (neg.f64 (neg.f64 l)))
(/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d) l)
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 (neg.f64 l) d))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M d)) (neg.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l d) (*.f64 #s(literal -1/4 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 l) d) (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d)))
(neg.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)))
(+.f64 #s(literal 0 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 l) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 h) d) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 l) d) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 h) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) #s(literal -1 binary64)))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 (sqrt.f64 h) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d)) #s(literal -1 binary64)))
(*.f64 (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 l)) (/.f64 d (sqrt.f64 h)))
(*.f64 (/.f64 d (sqrt.f64 l)) (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 h)))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d))
(*.f64 (*.f64 (neg.f64 d) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))
(*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h))))
(*.f64 d (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (*.f64 l h))))
(*.f64 d (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d)) #s(literal -1 binary64))
(/.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d) #s(literal 1 binary64)) (sqrt.f64 (*.f64 l h)))
(/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (*.f64 l h)) d))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 (neg.f64 d) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64)) (neg.f64 d)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) #s(literal -1 binary64)) d) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal -1 binary64)) (sqrt.f64 (*.f64 l h))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (neg.f64 d)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) d) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d))) (fma.f64 (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (sqrt.f64 (*.f64 l h))))
(/.f64 (*.f64 (neg.f64 d) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d))))
(/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h)))
(/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (*.f64 l h)) d))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d)))
(neg.f64 (/.f64 (*.f64 (neg.f64 d) (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))) (sqrt.f64 (*.f64 l h))))
(neg.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (pow.f64 (/.f64 (/.f64 l d) (neg.f64 d)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (/.f64 (/.f64 l d) (neg.f64 d)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (pow.f64 (/.f64 l (*.f64 d d)) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (/.f64 l (*.f64 d d)) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (pow.f64 (/.f64 (/.f64 l d) d) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (/.f64 (/.f64 l d) d) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (pow.f64 (/.f64 (/.f64 l d) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (/.f64 (/.f64 l d) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 d h)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (pow.f64 #s(literal -1 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 l (*.f64 (neg.f64 d) (/.f64 d h))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 #s(literal -1 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 l (*.f64 (neg.f64 d) (/.f64 d h))) #s(literal -1/2 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) 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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) 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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (pow.f64 (*.f64 (/.f64 l (*.f64 d d)) h) #s(literal -1/4 binary64)) (pow.f64 (*.f64 (/.f64 l (*.f64 d d)) h) #s(literal -1/4 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (*.f64 (/.f64 l (*.f64 d d)) h) #s(literal -1/4 binary64)) (pow.f64 (*.f64 (/.f64 l (*.f64 d d)) h) #s(literal -1/4 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) 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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) 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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h)) #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h)) #s(literal -1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) h) #s(literal -1/2 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (/.f64 d (sqrt.f64 h)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (/.f64 d (sqrt.f64 h)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d h) l)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d h) l)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (sqrt.f64 d) (pow.f64 (/.f64 (/.f64 d h) l) #s(literal 1/2 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 d) (pow.f64 (/.f64 (/.f64 d h) l) #s(literal 1/2 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) 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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) 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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) 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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 d) (/.f64 d h))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 d) (/.f64 d h))) #s(literal -1/2 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) 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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (/.f64 d (sqrt.f64 h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 d (sqrt.f64 h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 #s(literal -1 binary64) (/.f64 d (neg.f64 (sqrt.f64 (*.f64 l h)))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 #s(literal -1 binary64) (/.f64 d (neg.f64 (sqrt.f64 (*.f64 l h)))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(fma.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d))) #s(literal -1 binary64)))
(+.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.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 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64))))
(*.f64 (fma.f64 (pow.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l))))))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)))) (fma.f64 (pow.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) #s(literal -1 binary64))) (neg.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))) (neg.f64 (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l))))))
(/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) #s(literal -1 binary64)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64)))
(/.f64 (fma.f64 (pow.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)))) (fma.f64 (pow.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 D (/.f64 D d))) (/.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) d) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 D D)) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) d) (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D)) (/.f64 #s(literal 1 binary64) (*.f64 d d)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 D (/.f64 D d)) (*.f64 (/.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) d) (*.f64 (/.f64 h l) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)) (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)) (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (*.f64 (/.f64 h l) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))) (*.f64 (/.f64 h l) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)) #s(literal 1 binary64))
(fma.f64 (/.f64 h l) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) #s(literal 1 binary64))
(-.f64 (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 (/.f64 d (sqrt.f64 (neg.f64 h))))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 l)))))
(*.f64 (*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))
(*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))))
(*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #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 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 (/.f64 d (sqrt.f64 (neg.f64 h)))))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 l)))))
(/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 (/.f64 d (sqrt.f64 (neg.f64 h))))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h)))))))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 l)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #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 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))))
(neg.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 (/.f64 d (sqrt.f64 (neg.f64 h))))) (sqrt.f64 (neg.f64 l))))
(neg.f64 (/.f64 (*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (neg.f64 l)))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h)))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h)))
(*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d)))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 d))))
(*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (neg.f64 h))))
(/.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) #s(literal -1 binary64)) (/.f64 d (sqrt.f64 (neg.f64 h)))) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (neg.f64 h)))) (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)))))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(/.f64 (*.f64 (sqrt.f64 d) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 h))
(/.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) #s(literal -1 binary64)) (sqrt.f64 (/.f64 d h))) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) #s(literal -1 binary64))) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (pow.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)))))
(/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h))
(/.f64 (*.f64 (sqrt.f64 d) (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) #s(literal -1 binary64))) (*.f64 (sqrt.f64 h) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64))))
(/.f64 (*.f64 (sqrt.f64 d) (fma.f64 (pow.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l))))))
(/.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) #s(literal -1 binary64)) (sqrt.f64 d)) (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal -1 binary64)) (sqrt.f64 h)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (sqrt.f64 d)) (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d)))) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)))) (sqrt.f64 h)))
(fma.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))))
(fma.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))))
(fma.f64 (pow.f64 (*.f64 d #s(literal 1 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))))
(fma.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 d h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))))
(fma.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))))
(fma.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 h))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))))
(fma.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 h)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d h)))
(fma.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (*.f64 (sqrt.f64 (/.f64 d h)) #s(literal 1 binary64)))
(fma.f64 (sqrt.f64 (/.f64 d h)) #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l))))
(fma.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d h)))
(+.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l))) (*.f64 (sqrt.f64 (/.f64 d h)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sqrt.f64 (/.f64 d h)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l))))
(+.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 #s(literal -1/2 binary64) h)) (*.f64 (*.f64 d d) l)) (sqrt.f64 (/.f64 d h))))
(*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 l #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 #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 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 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 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (sqrt.f64 (/.f64 (neg.f64 d) #s(literal -1 binary64))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 l))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 (sqrt.f64 d) (sqrt.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 #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 (neg.f64 d)) #s(literal 1/2 binary64)) (*.f64 (log.f64 (neg.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 (*.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 M d) #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M d))
(*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 M d)))
(*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1/2 binary64))
(*.f64 M (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))))
(pow.f64 (/.f64 d (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 d M))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) #s(literal 1 binary64)) (/.f64 d M))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (neg.f64 d))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d)
(/.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 d M))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)))
(*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) h))
(*.f64 (/.f64 d h) d)
(*.f64 d (/.f64 d h))
(pow.f64 (/.f64 h (*.f64 d d)) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) d) (/.f64 h d))
(/.f64 (*.f64 d #s(literal 1 binary64)) (/.f64 h d))
(/.f64 (*.f64 (neg.f64 d) d) (neg.f64 h))
(/.f64 (*.f64 d d) h)
(/.f64 #s(literal 1 binary64) (/.f64 h (*.f64 d d)))
(/.f64 d (/.f64 h d))
(exp.f64 (fma.f64 (log.f64 d) #s(literal 2 binary64) (neg.f64 (log.f64 h))))
(*.f64 (pow.f64 (/.f64 l #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 d (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 l M) #s(literal -1 binary64)) (pow.f64 (/.f64 d (*.f64 #s(literal 1/4 binary64) D)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 d (*.f64 #s(literal 1/4 binary64) D)) #s(literal -1 binary64)) (pow.f64 (/.f64 l M) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 d #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 l (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) D) l) M) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 #s(literal 1/4 binary64) l) (/.f64 (*.f64 M D) d))
(*.f64 (/.f64 #s(literal 1/4 binary64) d) (/.f64 (*.f64 M D) l))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) D) d) (/.f64 M l))
(*.f64 (/.f64 M l) (/.f64 (*.f64 #s(literal 1/4 binary64) D) d))
(*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D))
(*.f64 (*.f64 M (/.f64 (*.f64 #s(literal 1/4 binary64) D) l)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)) (*.f64 (*.f64 #s(literal 1/4 binary64) D) M))
(*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M (/.f64 (*.f64 #s(literal 1/4 binary64) D) l)))
(*.f64 (/.f64 #s(literal 1 binary64) l) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M d))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M d)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) D) l) (/.f64 M d))
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 l) d)))
(*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (/.f64 #s(literal 1 binary64) (*.f64 l d)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) (*.f64 l d)))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 l d))))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 l d))))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M d)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (/.f64 M d) (/.f64 (*.f64 #s(literal 1/4 binary64) D) l))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 M (*.f64 l d))))
(*.f64 M (/.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 l d)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 #s(literal 1 binary64) (*.f64 l d))))
(*.f64 D (*.f64 #s(literal 1/4 binary64) (/.f64 M (*.f64 l d))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) l))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal 1 binary64) l)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 M (*.f64 l d))))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 M (*.f64 l d)) (*.f64 #s(literal 1/4 binary64) D)))
(pow.f64 (/.f64 d (*.f64 M (/.f64 (*.f64 #s(literal 1/4 binary64) D) l))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d) #s(literal -1 binary64))
(/.f64 (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d) #s(literal -1 binary64)) l)
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) D) l) (neg.f64 M)) (neg.f64 d))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) D) l) #s(literal 1 binary64)) (/.f64 d M))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) D) l) M) d)
(/.f64 (neg.f64 (*.f64 M (/.f64 (*.f64 #s(literal 1/4 binary64) D) l))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D))) (neg.f64 (*.f64 (neg.f64 l) d)))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d)) (neg.f64 (neg.f64 l)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M d)) #s(literal 1 binary64)) l)
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) #s(literal 1 binary64)) (*.f64 l (/.f64 d M)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) #s(literal 1 binary64)) (*.f64 l d))
(/.f64 (*.f64 M (/.f64 (*.f64 #s(literal 1/4 binary64) D) l)) d)
(/.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) D) l) (/.f64 d M))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 (neg.f64 l) d))
(/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d) (neg.f64 l))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M d)) l)
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 M (/.f64 (*.f64 #s(literal 1/4 binary64) D) l))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d))
(neg.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) 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 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 (sqrt.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) #s(literal 1 binary64)))
(*.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 (*.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 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 (pow.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) D)
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 1 binary64)) D)
(*.f64 (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 M d) #s(literal 1 binary64)))
(*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(*.f64 (sqrt.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (sqrt.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))))
(*.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))
(*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) (/.f64 #s(literal 1 binary64) d))
(*.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) (pow.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) d) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 M D) (/.f64 (/.f64 #s(literal 1/2 binary64) d) #s(literal 1 binary64)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) 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 (*.f64 D #s(literal 1/2 binary64)) (/.f64 M d))
(*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64))
(*.f64 M (pow.f64 (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 M (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)))
(*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (pow.f64 (/.f64 M #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 M #s(literal 1 binary64)))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) M)
(*.f64 D (pow.f64 (/.f64 M (*.f64 #s(literal 2 binary64) d)) #s(literal 1 binary64)))
(*.f64 D (pow.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 M d)) #s(literal 1 binary64)))
(*.f64 D (pow.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)))
(*.f64 D (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 1 binary64)))
(*.f64 D (/.f64 M (*.f64 #s(literal 2 binary64) d)))
(*.f64 D (*.f64 #s(literal 1/2 binary64) (/.f64 M d)))
(*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 D (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 (*.f64 M D) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.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 (*.f64 M D) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M D))
(*.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) (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 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))))
(pow.f64 (sqrt.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) 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 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64))
(/.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 M (/.f64 D d)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 d))
(/.f64 (*.f64 M (*.f64 D #s(literal 1/2 binary64))) 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 M #s(literal 1/2 binary64)) D) d)
(/.f64 (/.f64 (*.f64 M D) d) #s(literal 2 binary64))
(/.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 D #s(literal 1/2 binary64)) M) 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 (*.f64 (*.f64 (neg.f64 M) D) (/.f64 #s(literal 1/2 binary64) 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 D #s(literal 1/2 binary64)) (/.f64 d M))
(/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64))
(/.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))))
(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 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))
(*.f64 (*.f64 (*.f64 D D) M) (*.f64 #s(literal 1/4 binary64) M))
(*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D) D)
(*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) #s(literal 1/4 binary64))
(*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) (*.f64 D D))
(*.f64 (*.f64 M M) (*.f64 #s(literal 1/4 binary64) (*.f64 D D)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 D D) M) M))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) M) (*.f64 D D)))
(*.f64 D (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D))
(*.f64 (pow.f64 (/.f64 d (*.f64 (*.f64 (*.f64 D D) M) M)) #s(literal -1 binary64)) (pow.f64 (/.f64 d #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 D D) M) M) d) (/.f64 #s(literal 1/4 binary64) d))
(*.f64 (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))) (*.f64 D D))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 d d))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)))
(*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d)))
(*.f64 (/.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) d) (*.f64 D (/.f64 D d)))
(*.f64 (*.f64 D (/.f64 D d)) (/.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) d))
(*.f64 (/.f64 D d) (pow.f64 (/.f64 d (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D)) #s(literal -1 binary64)))
(*.f64 (/.f64 D d) (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D) d))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 d) d)))
(*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) (/.f64 (*.f64 D D) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))
(*.f64 D (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D) (*.f64 d d)))
(*.f64 D (*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D) (/.f64 #s(literal 1 binary64) (*.f64 d d))))
(*.f64 D (*.f64 D (*.f64 (*.f64 M M) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d)))
(pow.f64 (/.f64 d (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 D (/.f64 D d)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) d)
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) #s(literal 1 binary64)) (*.f64 d d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) #s(literal -1/4 binary64))) (neg.f64 (*.f64 (neg.f64 d) d)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d)) d)
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) #s(literal -1/4 binary64)) (*.f64 (neg.f64 d) d))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)))))
(/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) #s(literal -1/4 binary64)) (*.f64 d d)))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) (*.f64 (neg.f64 d) d)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)))) #s(literal -1 binary64)))
(*.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 d #s(literal 1 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 d h)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d))
(*.f64 (sqrt.f64 d) (/.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 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 h d) #s(literal -1/4 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 #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 (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 (/.f64 d h) #s(literal 1/2 binary64))
(/.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 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 d) (sqrt.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 #s(literal 1 binary64) (sqrt.f64 (/.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 (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 (/.f64 d h)) #s(literal 1/2 binary64)))

eval385.0ms (1.9%)

Memory
31.0MiB live, 576.8MiB allocated
Compiler

Compiled 65 645 to 3 818 computations (94.2% saved)

prune569.0ms (2.8%)

Memory
1.3MiB live, 604.8MiB allocated
Pruning

51 alts after pruning (49 fresh and 2 done)

PrunedKeptTotal
New2 188272 215
Fresh182240
Picked415
Done011
Total2 210512 261
Accuracy
94.7%
Counts
2 261 → 51
Alt Table
Click to see full alt table
StatusAccuracyProgram
30.7%
(/.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) d) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h)))
41.1%
(/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d)) #s(literal 1/2 binary64))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h)))
36.1%
(/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h)))
37.7%
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) d) (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
38.4%
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (*.f64 (/.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) d) (*.f64 D (/.f64 D d))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
40.8%
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (*.f64 (/.f64 D d) (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
▶16.2%
(/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
20.6%
(/.f64 #s(approx (* (+ (* (* (neg (/ (* (* 1/4 D) M) (* l d))) (* M (* D (/ 1/2 d)))) h) 1) d) (/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) l)) (*.f64 d d)) d)) (sqrt.f64 (*.f64 l h)))
22.2%
(/.f64 #s(approx (* (+ (* (* (neg (/ (* (* 1/4 D) M) (* l d))) (* M (* D (/ 1/2 d)))) h) 1) d) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 D D))) (*.f64 D D))) (sqrt.f64 (*.f64 l h)))
18.0%
(/.f64 #s(approx (* (+ (* (* (neg (/ (* (* 1/4 D) M) (* l d))) (* M (* D (/ 1/2 d)))) h) 1) d) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 M (/.f64 M (*.f64 l d))) (*.f64 D D)))) (sqrt.f64 (*.f64 l h)))
28.9%
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
29.5%
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) d))
70.7%
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
70.2%
(*.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
47.4%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #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) D) M) (/.f64 #s(literal 1 binary64) h)))))
47.3%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))) (-.f64 #s(literal 1 binary64) (*.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) D) M) (/.f64 #s(literal 1 binary64) h)))))
▶74.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
47.5%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
74.0%
(*.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) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
29.9%
(*.f64 d (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (*.f64 l h))))
27.1%
#s(approx (/ (* (+ (* (* (neg (/ (* (* 1/4 D) M) (* l d))) (* M (* D (/ 1/2 d)))) h) 1) d) (sqrt (* l h))) (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) 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))
14.7%
#s(approx (/ (* (+ (* (* (neg (/ (* (* 1/4 D) M) (* l d))) (* M (* D (/ 1/2 d)))) h) 1) d) (sqrt (* l 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))))))
23.3%
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (sqrt (neg d))) (sqrt (neg l))) (*.f64 (neg.f64 d) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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))))))
31.3%
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (sqrt (neg d))) (sqrt (neg l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
▶2.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
23.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
23.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 d (sqrt.f64 h)) (sqrt.f64 l)))
43.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))))
22.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
17.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 (/.f64 d h) d)) (sqrt.f64 l)))
19.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 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
24.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 l h))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)) h)) (*.f64 l l)))
▶11.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)))
9.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)) (*.f64 l l)))
10.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (neg.f64 d) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 l l)))
23.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓22.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 d (sqrt.f64 (*.f64 l h))))
22.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
22.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 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))))))
22.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 l h)) (/.f64 #s(literal 1 binary64) d))))
26.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l (*.f64 d d)) h))))
31.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (/ l (* d (/ d h)))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
2.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 (neg.f64 h))) d))
22.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d))
17.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 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
43.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 l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
20.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 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d))
24.1%
#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))))
30.0%
#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 (*.f64 l h)) d)))
▶42.1%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
Compiler

Compiled 2 602 to 1 674 computations (35.7% saved)

simplify116.0ms (0.6%)

Memory
14.1MiB live, 169.1MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
#s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))))
cost-diff0
(*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d)))
cost-diff0
(/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
cost-diff128
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))
cost-diff0
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
cost-diff0
#s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))))
cost-diff0
(/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))
cost-diff0
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)))
cost-diff0
(sqrt.f64 (neg.f64 h))
cost-diff0
(/.f64 d (sqrt.f64 (neg.f64 h)))
cost-diff0
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
cost-diff384
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))
cost-diff0
(sqrt.f64 (*.f64 l h))
cost-diff0
(/.f64 d (sqrt.f64 (*.f64 l h)))
cost-diff0
(fabs.f64 (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
cost-diff384
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff1088
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
cost-diff5824
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Rules
8 580×lower-*.f32
8 538×lower-*.f64
3 392×lower-fma.f64
3 392×lower-fma.f32
2 802×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0104770
0154761
1307731
2874721
34537721
08209710
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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l)
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d)
(*.f64 (*.f64 #s(literal 1/4 binary64) D) M)
(*.f64 #s(literal 1/4 binary64) D)
#s(literal 1/4 binary64)
D
M
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
(/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fabs.f64 (/.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
#s(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 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))
(/.f64 d (sqrt.f64 (neg.f64 h)))
d
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
h
(sqrt.f64 (neg.f64 l))
(neg.f64 l)
l
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)))
(/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))
#s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(*.f64 (*.f64 M M) #s(literal -1/8 binary64))
(*.f64 M M)
M
#s(literal -1/8 binary64)
(*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))
(/.f64 (*.f64 D D) d)
(*.f64 D D)
D
d
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
l
h
(*.f64 l l)
(/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d)))
#s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))
(*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
#s(literal -1/8 binary64)
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(/.f64 h (*.f64 (*.f64 d d) d))
h
(*.f64 (*.f64 d d) d)
(*.f64 d d)
d
(*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))
(*.f64 (neg.f64 M) M)
(neg.f64 M)
M
(/.f64 (*.f64 D D) l)
(*.f64 D D)
D
l
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
(sqrt.f64 (neg.f64 l))
(neg.f64 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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal 1/2 binary64) D) M)) (*.f64 (*.f64 l d) d)) #s(literal 1 binary64)) (*.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))) (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))
(fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal 1/2 binary64) D) M)) (*.f64 (*.f64 l d) d)) #s(literal 1 binary64))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) (/.f64 (*.f64 h (*.f64 (*.f64 #s(literal 1/2 binary64) D) M)) (*.f64 (*.f64 l d) d)))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l)
(*.f64 (/.f64 M (*.f64 l d)) (*.f64 D #s(literal 1/4 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d)
(/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) d)
(*.f64 (*.f64 #s(literal 1/4 binary64) D) M)
(*.f64 M (*.f64 D #s(literal 1/4 binary64)))
(*.f64 #s(literal 1/4 binary64) D)
(*.f64 D #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
D
M
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) h)
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
(/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fabs.f64 (/.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
#s(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 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (neg.f64 h)))))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))
(/.f64 d (*.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (neg.f64 h))))
(/.f64 d (sqrt.f64 (neg.f64 h)))
d
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
h
(sqrt.f64 (neg.f64 l))
(neg.f64 l)
l
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h))) (/.f64 D d)) D)) (*.f64 l l)))
(/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))
(/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h))) (/.f64 D d)) D)) (*.f64 l l))
#s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))))
#s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h))) (/.f64 D d)) D))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h))) (/.f64 D d)) D)
(*.f64 (*.f64 M M) #s(literal -1/8 binary64))
(*.f64 M M)
M
#s(literal -1/8 binary64)
(*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))
(/.f64 (*.f64 D D) d)
(*.f64 D D)
D
d
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
l
h
(*.f64 l l)
(/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (*.f64 D D) l) M) M)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))) (sqrt.f64 (neg.f64 l)))
(*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d)))
(*.f64 (sqrt.f64 (neg.f64 d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (*.f64 D D) l) M) M)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))))
#s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))))
#s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (*.f64 D D) l) M) M)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (*.f64 D D) l) M) M)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))
#s(literal -1/8 binary64)
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(/.f64 h (*.f64 (*.f64 d d) d))
h
(*.f64 (*.f64 d d) d)
(*.f64 d d)
d
(*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))
(*.f64 (/.f64 (*.f64 (neg.f64 D) D) l) (*.f64 M M))
(*.f64 (neg.f64 M) M)
(neg.f64 M)
M
(/.f64 (*.f64 D D) l)
(*.f64 D D)
D
l
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
(sqrt.f64 (neg.f64 l))
(neg.f64 l)

localize265.0ms (1.3%)

Memory
-28.0MiB live, 423.0MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy5.669774653549605
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))
accuracy7.5820354785420925
(*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))
accuracy11.518059647643511
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
accuracy17.76986577553454
#s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))))
accuracy7.609300552300038
(sqrt.f64 (*.f64 l h))
accuracy11.051691447661518
(/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))
accuracy17.540091492881704
#s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))))
accuracy34.64745961229978
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)))
accuracy0
(neg.f64 h)
accuracy0.15625
(/.f64 d (sqrt.f64 (neg.f64 h)))
accuracy0.8379974928987604
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))
accuracy33.612692765647566
#s(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 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
accuracy0
(fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))
accuracy0.1328125
(/.f64 d (sqrt.f64 (*.f64 l h)))
accuracy7.609300552300038
(sqrt.f64 (*.f64 l h))
accuracy17.05361745930318
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
accuracy2.683011488303461
(*.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
accuracy3.2244930452786065
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
accuracy5.540895981001919
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy7.843305121920059
(sqrt.f64 (/.f64 d l))
Samples
94.0ms142×0valid
68.0ms114×0invalid
Compiler

Compiled 631 to 90 computations (85.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 127.0ms
ival-mult: 58.0ms (45.6% of total)
ival-div: 32.0ms (25.2% of total)
ival-sqrt: 12.0ms (9.4% of total)
ival-pow: 11.0ms (8.7% of total)
ival-neg: 4.0ms (3.1% of total)
ival-pow2: 3.0ms (2.4% of total)
ival-add: 2.0ms (1.6% of total)
ival-sub: 2.0ms (1.6% of total)
ival-fabs: 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)

series104.0ms (0.5%)

Memory
11.0MiB live, 206.0MiB allocated
Counts
25 → 1 056
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 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())
#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.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 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 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 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())
#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())
#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())
#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())
#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())
#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())
Outputs
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l 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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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 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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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))))) (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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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 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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l 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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))) (patch (fabs.f64 (/.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 (* 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 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 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 (* 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 (* 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 (* 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 (* 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 (* 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 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 (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 (* -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 (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 (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (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 (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(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 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 h))) (patch (/.f64 d (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor 0 h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor 0 h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor 0 h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor 0 h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt h) (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt h) (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt h) (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt h) (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l 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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 M) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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)))) (taylor 0 M) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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)))) (taylor 0 M) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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)))) (taylor 0 M) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf M) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor inf M) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor inf M) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor inf M) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf M) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf M) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf M) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf M) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 D) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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)))) (taylor 0 D) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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)))) (taylor 0 D) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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)))) (taylor 0 D) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf D) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor inf D) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor inf D) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor inf D) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf D) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf D) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf D) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf D) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 d) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d) (taylor 0 d) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d) (taylor 0 d) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d) (taylor 0 d) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf d) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))) (taylor inf d) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))) (taylor inf d) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))) (taylor inf d) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor -inf d) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))) (taylor -inf d) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))) (taylor -inf d) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))) (taylor -inf d) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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)))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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)))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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)))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -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 (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -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 (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -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 (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/8 (* (/ (* (pow 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 (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/8 (* (/ (* (pow 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 (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/8 (* (/ (* (pow 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 (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 h) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h) (taylor 0 h) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h) (taylor 0 h) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h) (taylor 0 h) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf h) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3)))))) (taylor inf h) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3)))))) (taylor inf h) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3)))))) (taylor inf h) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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 l)))) (taylor -inf h) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h))))))) (taylor -inf h) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h))))))) (taylor -inf h) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h))))))) (taylor -inf h) (#s(alt #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (patch #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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 l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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 l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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 l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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 l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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 l)))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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 l)))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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 l)))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) 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 l)))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 h) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 h) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 h) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 h) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h) (taylor 0 h) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h) (taylor 0 h) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h) (taylor 0 h) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor inf h) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3)))))) (taylor inf h) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3)))))) (taylor inf h) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3)))))) (taylor inf h) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt h))) (taylor -inf h) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h))))))) (taylor -inf h) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h))))))) (taylor -inf h) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h))))))) (taylor -inf h) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor 0 l) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l) (taylor 0 l) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l) (taylor 0 l) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l) (taylor 0 l) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf l) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor inf l) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor inf l) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor inf l) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor -inf l) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf l) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf l) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf l) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 D) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 D) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 D) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 D) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor inf D) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor inf D) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor inf D) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor inf D) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor -inf D) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor -inf D) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor -inf D) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor -inf D) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 M) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 M) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 M) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 M) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor inf M) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor inf M) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor inf M) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor inf M) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor -inf M) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor -inf M) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor -inf M) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor -inf M) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor 0 d) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d) (taylor 0 d) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d) (taylor 0 d) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d) (taylor 0 d) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf d) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))) (taylor inf d) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))) (taylor inf d) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))) (taylor inf d) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf d) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))) (taylor -inf d) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))) (taylor -inf d) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))) (taylor -inf d) (#s(alt (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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 (*.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) 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 (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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor 0 h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor 0 h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor 0 h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor 0 h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor -inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor -inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor -inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor -inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (patch (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) #<representation binary64>) () ())) ())
Calls

264 calls:

TimeVariablePointExpression
4.0ms
h
@-inf
(* (* (* M M) -1/8) (* (/ (* D D) d) (sqrt (* l h))))
2.0ms
h
@0
(* (* -1/8 (sqrt (/ h (* (* d d) d)))) (* (* (neg M) M) (/ (* D D) l)))
1.0ms
M
@0
(* (* -1/8 (sqrt (/ h (* (* d d) d)))) (* (* (neg M) M) (/ (* D D) l)))
1.0ms
D
@0
(* (* -1/8 (sqrt (/ h (* (* d d) d)))) (* (* (neg M) M) (/ (* D D) l)))
1.0ms
d
@0
(* (* -1/8 (sqrt (/ h (* (* d d) d)))) (* (* (neg M) M) (/ (* D D) l)))

simplify214.0ms (1.1%)

Memory
17.5MiB live, 293.1MiB allocated
Algorithm
1×egg-herbie
Rules
8 310×lower-*.f64
8 310×lower-*.f32
4 226×lower-fma.f64
4 226×lower-fma.f32
2 952×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
035419938
1107419279
2399319225
3752219165
0805018790
Stop Event
1×iter limit
1×node limit
Counts
1 056 → 1 056
Calls
Call 1
Inputs
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(* 1/2 (/ (* 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) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow 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))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* (/ 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 (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 (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 (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))))
(* (/ 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 (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))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(* (sqrt h) (sqrt -1))
(* (sqrt h) (sqrt -1))
(* (sqrt h) (sqrt -1))
(* (sqrt h) (sqrt -1))
(* (sqrt h) (sqrt -1))
(* (sqrt h) (sqrt -1))
(* (sqrt h) (sqrt -1))
(* (sqrt h) (sqrt -1))
(* -1 (* (sqrt h) (sqrt -1)))
(* -1 (* (sqrt h) (sqrt -1)))
(* -1 (* (sqrt h) (sqrt -1)))
(* -1 (* (sqrt h) (sqrt -1)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* d (sqrt (/ (pow l 3) h)))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(* d (sqrt (/ (pow l 3) h)))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d)
(* d (sqrt (/ (pow l 3) h)))
(* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))
(* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))
(* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))
(* d (sqrt (/ (pow l 3) h)))
(* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))))
(* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))))
(* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(* d (sqrt (/ (pow l 3) h)))
(* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))))
(* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))))
(* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h)))
(* (pow l 2) (+ (* 1/8 (* (/ (* (pow 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 l 2) (+ (* 1/8 (* (/ (* (pow 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 l 2) (+ (* 1/8 (* (/ (* (pow 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 (/ (pow l 3) h)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3))))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h)))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt h)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(sqrt (/ d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(sqrt (/ d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1 h)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1 h)
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(sqrt (/ h (pow d 3)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
Outputs
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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))))
(* 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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))) (* -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 (* (* 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 #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 (* 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 #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 (* 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 #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)
(/ (+ (* -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 h h) (/.f64 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 h h) (/.f64 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 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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) (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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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)
(+ (* -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 (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 (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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(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)
(* 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))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* -1 (* (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))
(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))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (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)
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (/ d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (/.f64 d #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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))) (* -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 (* (* 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 #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 (* 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 #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 (* 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 #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)
(/ (+ (* -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 h h) (/.f64 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 h h) (/.f64 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 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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) (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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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)
(+ (* -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 (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 (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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (/ d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(* (sqrt h) (sqrt -1))
(*.f64 (sqrt.f64 h) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt h) (sqrt -1))
(*.f64 (sqrt.f64 h) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt h) (sqrt -1))
(*.f64 (sqrt.f64 h) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt h) (sqrt -1))
(*.f64 (sqrt.f64 h) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt h) (sqrt -1))
(*.f64 (sqrt.f64 h) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt h) (sqrt -1))
(*.f64 (sqrt.f64 h) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt h) (sqrt -1))
(*.f64 (sqrt.f64 h) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt h) (sqrt -1))
(*.f64 (sqrt.f64 h) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* (sqrt h) (sqrt -1)))
(*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* (sqrt h) (sqrt -1)))
(*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* (sqrt h) (sqrt -1)))
(*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* (sqrt h) (sqrt -1)))
(*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 #s(literal -1 binary64)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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))) (* -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 (* (* 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 #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 (* 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 #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 (* 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 #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)
(/ (+ (* -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 h h) (/.f64 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 h h) (/.f64 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 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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) (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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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)
(+ (* -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 (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 (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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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))) (* -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)
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 #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 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 #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 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 #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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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)
(+ (* -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 (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 (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 h h) (/.f64 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 h h) (/.f64 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 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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) (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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)))
(* d (sqrt (/ (pow l 3) h)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h)) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h)) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h)) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h)) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h)) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h)) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 M M))
(* d (sqrt (/ (pow l 3) h)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h)) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h)) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h)) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h)) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h)) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h)) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 M M)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 M M)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 M M)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) (*.f64 d d))) d)
(* d (sqrt (/ (pow l 3) h)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)
(* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))) d)
(* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))) d)
(* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))) d)
(* d (sqrt (/ (pow l 3) h)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)
(* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))) d)
(* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))) d)
(* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h)))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d))
(* d (sqrt (/ (pow l 3) h)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)
(* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))))
(*.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)) (*.f64 l l))
(* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))))
(*.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)) (*.f64 l l))
(* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))))
(*.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)) (*.f64 l l))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h)))
(*.f64 (neg.f64 d) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))
(* (pow l 2) (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.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 l l))
(* (pow l 2) (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.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 l l))
(* (pow l 2) (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.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 l l))
(* d (sqrt (/ (pow l 3) h)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (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 l (*.f64 h h)) h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 h (*.f64 l l)) l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (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 l (*.f64 h h)) h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 h (*.f64 l l)) l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (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 l (*.f64 h h)) h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 h (*.f64 l l)) l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3))))))
(*.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 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3))))))
(*.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 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3))))))
(*.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 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)) h)
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #s(literal 1/8 binary64))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h)))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 l h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h)))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 l h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h)))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 l h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #s(literal 1/8 binary64))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #s(literal 1/8 binary64))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #s(literal 1/8 binary64))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #s(literal 1/8 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #s(literal 1/8 binary64))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #s(literal 1/8 binary64))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #s(literal 1/8 binary64))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))) #s(literal 1/8 binary64))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 D D))) (/.f64 #s(literal -1/8 binary64) l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 D D))) (/.f64 #s(literal -1/8 binary64) l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 D D))) (/.f64 #s(literal -1/8 binary64) l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 D D))) (/.f64 #s(literal -1/8 binary64) l))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 D D))) (/.f64 #s(literal -1/8 binary64) l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 D D))) (/.f64 #s(literal -1/8 binary64) l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 D D))) (/.f64 #s(literal -1/8 binary64) l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 D D))) (/.f64 #s(literal -1/8 binary64) l))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (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 h h) (/.f64 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 h h) (/.f64 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 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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) (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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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)
(+ (* -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 (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 (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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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))) (* -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 (* 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 #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)))))
(* -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 #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)))))
(* -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 #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 (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d)))) (sqrt.f64 (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (sqrt.f64 h) d) (sqrt.f64 #s(literal -1 binary64)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d)))) (sqrt.f64 (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (sqrt.f64 h) d) (sqrt.f64 #s(literal -1 binary64)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d)))) (sqrt.f64 (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (sqrt.f64 h) d) (sqrt.f64 #s(literal -1 binary64)))) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d))) (sqrt.f64 h)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(*.f64 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h h) h))) (sqrt.f64 #s(literal -1 binary64))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(*.f64 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h h) h))) (sqrt.f64 #s(literal -1 binary64))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(*.f64 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h h) h))) (sqrt.f64 #s(literal -1 binary64))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt h)))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (*.f64 M M)) (*.f64 D D)) (*.f64 l d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 D D)) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 l d)))) #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h h) h))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 D D)) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 l d)))) #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h h) h))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 D D)) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 l d)))) #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h h) h))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d))) (sqrt.f64 h)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (/.f64 (*.f64 D D) d)) (*.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal -1 binary64))) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) l)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (/.f64 (*.f64 D D) d)) (*.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal -1 binary64))) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) l)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (/.f64 (*.f64 D D) d)) (*.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal -1 binary64))) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) l)
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d))) (sqrt.f64 h)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (*.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (*.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (*.f64 D D))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d))) (sqrt.f64 h)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (*.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (*.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (*.f64 D D))) (*.f64 D D))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d))) (sqrt.f64 h)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) (/.f64 D (*.f64 l d))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (*.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) (/.f64 D (*.f64 l d))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (*.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) (/.f64 D (*.f64 l d))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (*.f64 M M))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d))) (sqrt.f64 h)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) (/.f64 D (*.f64 l d))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (*.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) (/.f64 D (*.f64 l d))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (*.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) (/.f64 D (*.f64 l d))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (*.f64 M M))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M (*.f64 l d))) (sqrt.f64 h)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) D) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) D) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) D) D) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) d)
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l (*.f64 d d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l (*.f64 d d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l (*.f64 d d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(*.f64 (neg.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l (*.f64 d d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l (*.f64 d d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 h)) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) M) (*.f64 D D)) (*.f64 l (*.f64 d d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 #s(literal -1 binary64)))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (*.f64 h d))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (*.f64 h d))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (*.f64 (*.f64 h h) (/.f64 h (*.f64 (*.f64 d d) d)))) (sqrt.f64 (*.f64 h d))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) h))) (sqrt.f64 (/.f64 d (*.f64 (*.f64 h h) h)))) h)
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) h))) (sqrt.f64 (/.f64 d (*.f64 (*.f64 h h) h)))) h)
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) h))) (sqrt.f64 (/.f64 d (*.f64 (*.f64 h h) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 D D))) (/.f64 #s(literal -1/8 binary64) l))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) h))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M l))) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (*.f64 (*.f64 h h) h)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) h))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M l))) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (*.f64 (*.f64 h h) h)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) h))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M l))) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (*.f64 (*.f64 h h) h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 M M)) (*.f64 l (sqrt.f64 (/.f64 d h)))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 M M)) (*.f64 l (sqrt.f64 (/.f64 d h)))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 M M)) (*.f64 l (sqrt.f64 (/.f64 d h)))) l)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) l) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (*.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (*.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (*.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))) d)
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))) d)
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))) d)
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 (neg.f64 d) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.f64 D D)) (neg.f64 l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 (neg.f64 d) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.f64 D D)) (neg.f64 l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 (neg.f64 d) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.f64 D D)) (neg.f64 l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 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 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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))) (* -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 (* (* 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 #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 (* 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 #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 (* 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 #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)
(/ (+ (* -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 h h) (/.f64 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 h h) (/.f64 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 h h) (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.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) (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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(/ (+ (* -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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (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)
(+ (* -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 (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 (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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.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))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (/.f64 d (*.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 M M))
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))
(* -1 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) l)))

rewrite203.0ms (1%)

Memory
-12.7MiB live, 248.6MiB allocated
Rules
7 680×lower-*.f32
7 638×lower-*.f64
4 392×lower-/.f32
4 362×lower-/.f64
2 632×lower-pow.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0104569
0154544
1501499
23491486
010716476
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
25 → 699
Calls
Call 1
Inputs
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
(sqrt.f64 (*.f64 l h))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
(/.f64 d (sqrt.f64 (neg.f64 h)))
(sqrt.f64 (neg.f64 h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)))
(/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))) (*.f64 l l))
#s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))
(/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d)))
#s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))))
(sqrt.f64 (/.f64 d l))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
(neg.f64 h)
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))
Outputs
(*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 d h)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d))
(*.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 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 h d) #s(literal -1/4 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 #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 (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 (/.f64 d h) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (/.f64 (neg.f64 d) #s(literal -1 binary64))) (sqrt.f64 h))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 h))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 h d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.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 (-.f64 (*.f64 (log.f64 (neg.f64 d)) #s(literal 1/2 binary64)) (*.f64 (log.f64 (neg.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 (/.f64 d h)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) M) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal -1 binary64)) (*.f64 M h))
(*.f64 (/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal -1 binary64)) (neg.f64 h))
(*.f64 (/.f64 M #s(literal 1 binary64)) (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (*.f64 M h))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) d) #s(literal 1 binary64)) (/.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 M h) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) h)))
(*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)
(*.f64 M (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) h))
(*.f64 M (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (*.f64 M h))
(*.f64 D (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M h)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (*.f64 M D) h))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 D (*.f64 M h)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) h)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))
(*.f64 h (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (/.f64 #s(literal 1 binary64) h)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 M h)) d)
(/.f64 (neg.f64 (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) (/.f64 d h))
(/.f64 (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal -1 binary64) h))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(/.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))
(/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal 1 binary64) h))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))
(neg.f64 (/.f64 (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal 1 binary64) h)))
(neg.f64 (/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal -1 binary64) h)))
(exp.f64 (-.f64 (log.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (neg.f64 (log.f64 h))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))) #s(literal -1 binary64)))
#s(literal 1/2 binary64)
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) #s(literal -1 binary64)) (neg.f64 h))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (neg.f64 l)) (neg.f64 h))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64)) (/.f64 h l))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) #s(literal 1 binary64)) h)
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (*.f64 M h))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) #s(literal 1 binary64)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h)
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 h l))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 1 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) (/.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) l))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) (/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 l h)))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))
(*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))))
(*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (*.f64 h (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (*.f64 (*.f64 M h) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))
(pow.f64 (/.f64 l (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 l h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d)) #s(literal -1 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 l d))
(/.f64 (*.f64 (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))) (/.f64 #s(literal -1 binary64) h))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (/.f64 #s(literal -1 binary64) h))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))
(/.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) (*.f64 l d))
(/.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))) l)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (/.f64 l h))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))))) (/.f64 #s(literal -1 binary64) h))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (neg.f64 (/.f64 l h)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d) (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (/.f64 l h))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (*.f64 (neg.f64 l) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d) #s(literal 1 binary64)) (*.f64 (neg.f64 l) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (*.f64 l (/.f64 #s(literal -1 binary64) h)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) #s(literal 1 binary64)) (*.f64 l (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (*.f64 (*.f64 l d) (/.f64 #s(literal -1 binary64) h)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (*.f64 (*.f64 l d) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (*.f64 (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d) (/.f64 #s(literal -1 binary64) h)))
(/.f64 (*.f64 (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d)) (/.f64 l h))
(/.f64 (*.f64 (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d)) (*.f64 (/.f64 #s(literal -1 binary64) h) l))
(/.f64 (*.f64 (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) (*.f64 (/.f64 #s(literal -1 binary64) h) (*.f64 l d)))
(/.f64 (*.f64 (*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal -1 binary64) h) (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d)))
(/.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d)) (*.f64 (/.f64 #s(literal 1 binary64) h) (neg.f64 l)))
(/.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 l d)))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) d)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (neg.f64 l)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 l d)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) #s(literal 1 binary64)) (*.f64 (*.f64 l d) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) l)
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (/.f64 l h))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) l))
(/.f64 (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d))
(/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (*.f64 (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d)))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) M)) d) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (/.f64 l (*.f64 (*.f64 #s(literal 1/4 binary64) D) 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 d (sqrt.f64 (*.f64 l h))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 d)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 (neg.f64 l)) d) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.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 (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 (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 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 (sqrt.f64 h) d) #s(literal -1 binary64)))
(*.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 (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 (*.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (/.f64 d (sqrt.f64 (neg.f64 h))))
(*.f64 (/.f64 (neg.f64 d) (sqrt.f64 (neg.f64 h))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 l)))))
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))
(*.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 (fabs.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(*.f64 d (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
(*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l)))))
(*.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 (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))) d) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 h)) d) (sqrt.f64 (neg.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 (-.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) (/.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 (fabs.f64 (/.f64 d (sqrt.f64 l))) (fabs.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 (/.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 (neg.f64 d) d)) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d l))) (sqrt.f64 h))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (*.f64 (neg.f64 d) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (/.f64 (sqrt.f64 (neg.f64 h)) d))
(/.f64 (/.f64 (neg.f64 d) (sqrt.f64 (neg.f64 h))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d)))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (neg.f64 d) (*.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l)))))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 l)))))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (fabs.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (neg.f64 h) (neg.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 (/.f64 (sqrt.f64 (neg.f64 h)) d) (sqrt.f64 (neg.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 (/.f64 (neg.f64 d) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
(neg.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (neg.f64 (sqrt.f64 (neg.f64 l)))))
(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))))
(fabs.f64 (-.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 0 binary64)))
(fabs.f64 (-.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(fabs.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fabs.f64 (/.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 (sqrt.f64 (neg.f64 l)) (neg.f64 d)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 (neg.f64 l)) d) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.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 (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 (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 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 (sqrt.f64 h) d) #s(literal -1 binary64)))
(*.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 (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 (*.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (/.f64 d (sqrt.f64 (neg.f64 h))))
(*.f64 (/.f64 (neg.f64 d) (sqrt.f64 (neg.f64 h))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 l)))))
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))
(*.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 (fabs.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(*.f64 d (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
(*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l)))))
(*.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 (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))) d) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 h)) d) (sqrt.f64 (neg.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 (-.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) (/.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 (fabs.f64 (/.f64 d (sqrt.f64 l))) (fabs.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 (/.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 (neg.f64 d) d)) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d l))) (sqrt.f64 h))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (*.f64 (neg.f64 d) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (/.f64 (sqrt.f64 (neg.f64 h)) d))
(/.f64 (/.f64 (neg.f64 d) (sqrt.f64 (neg.f64 h))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d)))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (neg.f64 d) (*.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l)))))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 l)))))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (fabs.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (neg.f64 h) (neg.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 (/.f64 (sqrt.f64 (neg.f64 h)) d) (sqrt.f64 (neg.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 (/.f64 (neg.f64 d) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
(neg.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (neg.f64 (sqrt.f64 (neg.f64 l)))))
(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))))
(fabs.f64 (-.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 0 binary64)))
(fabs.f64 (-.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(fabs.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fabs.f64 (/.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 (fabs.f64 (pow.f64 (*.f64 l h) #s(literal 1/4 binary64))) (fabs.f64 (pow.f64 (*.f64 l h) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (*.f64 l h) #s(literal 1/4 binary64)) (pow.f64 (*.f64 l h) #s(literal 1/4 binary64)))
(*.f64 (fabs.f64 (sqrt.f64 h)) (fabs.f64 (sqrt.f64 l)))
(*.f64 (fabs.f64 (sqrt.f64 l)) (fabs.f64 (sqrt.f64 h)))
(*.f64 (sqrt.f64 h) (sqrt.f64 l))
(*.f64 (sqrt.f64 l) (sqrt.f64 h))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))
(pow.f64 (exp.f64 (log.f64 (*.f64 l h))) #s(literal 1/2 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))
(sqrt.f64 (*.f64 l h))
(fabs.f64 (-.f64 (sqrt.f64 (*.f64 l h)) #s(literal 0 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h)))))
(fabs.f64 (neg.f64 (sqrt.f64 (*.f64 l h))))
(fabs.f64 (sqrt.f64 (*.f64 l h)))
(exp.f64 (*.f64 (log.f64 (*.f64 l h)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 d)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 (neg.f64 l)) d) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.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 (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 (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 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 (sqrt.f64 h) d) #s(literal -1 binary64)))
(*.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 (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 (*.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (/.f64 d (sqrt.f64 (neg.f64 h))))
(*.f64 (/.f64 (neg.f64 d) (sqrt.f64 (neg.f64 h))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 l)))))
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))
(*.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 (fabs.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(*.f64 d (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
(*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l)))))
(*.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 (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))) d) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 h)) d) (sqrt.f64 (neg.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 (-.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) (/.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 (fabs.f64 (/.f64 d (sqrt.f64 l))) (fabs.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 (/.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 (neg.f64 d) d)) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d l))) (sqrt.f64 h))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (*.f64 (neg.f64 d) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (/.f64 (sqrt.f64 (neg.f64 h)) d))
(/.f64 (/.f64 (neg.f64 d) (sqrt.f64 (neg.f64 h))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d)))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (neg.f64 d) (*.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l)))))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 l)))))
(/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (fabs.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (neg.f64 h) (neg.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 (/.f64 (sqrt.f64 (neg.f64 h)) d) (sqrt.f64 (neg.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 (/.f64 (neg.f64 d) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
(neg.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (neg.f64 (sqrt.f64 (neg.f64 l)))))
(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))))
(fabs.f64 (-.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 0 binary64)))
(fabs.f64 (-.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(fabs.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fabs.f64 (/.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(approx (* (* (pow (/ d h) (/ 1 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 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) d)
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 d) (sqrt.f64 (neg.f64 h))))
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (neg.f64 h))))
(*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 (neg.f64 h)) d) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 (neg.f64 h)) d) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (neg.f64 (neg.f64 d)))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 (neg.f64 h)) d)) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) #s(literal -1 binary64))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (/.f64 (sqrt.f64 (neg.f64 h)) d)))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 h))))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (neg.f64 d))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 h))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (neg.f64 h))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (neg.f64 d))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 h))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (/.f64 (sqrt.f64 (neg.f64 h)) d))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (neg.f64 (/.f64 (sqrt.f64 (neg.f64 h)) d))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) d)) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 h)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (neg.f64 h)) d)))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (neg.f64 h)) d) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 h)) d))
(/.f64 d (sqrt.f64 (neg.f64 h)))
(neg.f64 (/.f64 (neg.f64 d) (sqrt.f64 (neg.f64 h))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))) (/.f64 (neg.f64 d) (sqrt.f64 (neg.f64 h))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 (neg.f64 h)) d)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (neg.f64 h) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 h) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 h) (sqrt.f64 #s(literal -1 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 h))
(pow.f64 (exp.f64 (log.f64 (neg.f64 h))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (neg.f64 h) (neg.f64 h)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (neg.f64 h) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (neg.f64 h) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 h h))) (sqrt.f64 (+.f64 #s(literal 0 binary64) h)))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 h h) h))) (sqrt.f64 (+.f64 #s(literal 0 binary64) (fma.f64 h h (*.f64 #s(literal 0 binary64) h)))))
(sqrt.f64 (neg.f64 h))
(exp.f64 (*.f64 (log.f64 (neg.f64 h)) #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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))) (*.f64 l l)))
(*.f64 (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))) l) (/.f64 #s(literal 1 binary64) l))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (pow.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))))
(*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))) l))
(*.f64 (neg.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h))))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 l) l)))
(*.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))) (/.f64 #s(literal 1 binary64) (*.f64 l l)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))) (*.f64 l l)))
(pow.f64 (/.f64 l (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))) l)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 l l) #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 l l) #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h))))) #s(literal -1 binary64))
(/.f64 (*.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))) #s(literal 1 binary64)) (*.f64 l l))
(/.f64 (neg.f64 (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))) l)) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))))) (neg.f64 (*.f64 (neg.f64 l) l)))
(/.f64 (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))) l) l)
(/.f64 (neg.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h))))) (*.f64 (neg.f64 l) l))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 l l) #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))))))
(/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))) (*.f64 l l))
(/.f64 #s(literal 1 binary64) (/.f64 l (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 l l) #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h))))))
(neg.f64 (/.f64 (neg.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h))))) (*.f64 l l)))
(neg.f64 (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))) (*.f64 (neg.f64 l) l)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 l l) #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))))) #s(literal -1 binary64)))
#s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h))))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))) (*.f64 #s(literal -1/8 binary64) M)) M)
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))) (*.f64 M M)) #s(literal -1/8 binary64))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))) M) (*.f64 #s(literal -1/8 binary64) M))
(*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h))) (/.f64 (*.f64 D D) d))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 l)) (sqrt.f64 h))
(*.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) d))
(*.f64 (*.f64 (sqrt.f64 (*.f64 l h)) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)))
(*.f64 (sqrt.f64 l) (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h))) (*.f64 M M))
(*.f64 (*.f64 #s(literal -1/8 binary64) M) (*.f64 M (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))))
(*.f64 (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 M M) #s(literal -1/8 binary64)))
(*.f64 (/.f64 (*.f64 D D) d) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 l h))))
(*.f64 (/.f64 (*.f64 D D) d) (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))
(*.f64 (*.f64 M M) (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h))))
(*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))))
(*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (sqrt.f64 (*.f64 l h))))
(*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)))
(*.f64 M (*.f64 (*.f64 #s(literal -1/8 binary64) M) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h)))))
(*.f64 M (*.f64 M (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)))))
(/.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 M M) #s(literal -1/8 binary64))) d)
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) D) D) (sqrt.f64 (*.f64 l h))) d)
(/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (*.f64 D D) (sqrt.f64 (*.f64 l h)))) d)
(/.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) D) D)) d)
(*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))) (*.f64 D D)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))) D) (/.f64 D l))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) (/.f64 D l)) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(*.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l)) (*.f64 (neg.f64 M) M))
(*.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64)) (neg.f64 M)) (*.f64 (/.f64 (*.f64 D D) l) M))
(*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64))
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))) (/.f64 (*.f64 D D) l))
(*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) (/.f64 D l)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64)))
(*.f64 (/.f64 (*.f64 D D) l) (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))))
(*.f64 (*.f64 (neg.f64 M) M) (*.f64 (/.f64 (*.f64 D D) l) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))))
(*.f64 (neg.f64 M) (*.f64 (*.f64 (/.f64 (*.f64 D D) l) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) (/.f64 D l)))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) (/.f64 D l))))
(*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))) l)
(/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))) (*.f64 (neg.f64 D) D)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))) #s(literal 1 binary64)) (/.f64 l (*.f64 D D)))
(/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) l)
(/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))) (*.f64 D D)) l)
(/.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))) (/.f64 l (*.f64 D D)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (neg.f64 d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (*.f64 (sqrt.f64 (neg.f64 d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 l)))))
(*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64))))
(*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64))) (sqrt.f64 (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))))
(*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 d l)))
(*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 (/.f64 l d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 (/.f64 l d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 l)))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (/.f64 l d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64))))))
(/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))) (sqrt.f64 (neg.f64 l)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (/.f64 l d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 l d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))))
(neg.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))) (sqrt.f64 (neg.f64 l))))
(neg.f64 (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))) (neg.f64 (sqrt.f64 (neg.f64 l)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 (/.f64 l d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64))))) #s(literal -1 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64))))
(*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64))) (sqrt.f64 (neg.f64 d)))
#s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (*.f64 (*.f64 (sqrt.f64 d) d) l)) #s(literal -1/8 binary64)))
(*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 l #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(*.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 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 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 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (sqrt.f64 (/.f64 (neg.f64 d) #s(literal -1 binary64))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 l))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.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 (neg.f64 d)) #s(literal 1/2 binary64)) (*.f64 (log.f64 (neg.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 (*.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 (fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (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/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d)))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)))) (fma.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h)) (fma.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M (*.f64 l d))) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) #s(literal 1 binary64)))
(fma.f64 (pow.f64 (/.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 d)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (/.f64 (sqrt.f64 (neg.f64 l)) d) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (/.f64 d (sqrt.f64 (neg.f64 h))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 (neg.f64 d) (sqrt.f64 (neg.f64 h))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 l)))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h)))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 d (fabs.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 d (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l)))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(+.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h)))
(+.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(*.f64 #s(literal -1 binary64) h)
(*.f64 h #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 h h)) (+.f64 #s(literal 0 binary64) h))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 h h) h)) (+.f64 #s(literal 0 binary64) (fma.f64 h h (*.f64 #s(literal 0 binary64) h))))
(neg.f64 h)
(-.f64 #s(literal 0 binary64) h)
(+.f64 #s(literal 0 binary64) (neg.f64 h))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) d) h) #s(literal -1/4 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 d d) d) h) #s(literal -1/4 binary64)))
(*.f64 (/.f64 (sqrt.f64 h) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) d)))
(*.f64 (/.f64 (sqrt.f64 h) d) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 d) d)) (sqrt.f64 h))
(*.f64 (sqrt.f64 h) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 d) d)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 (neg.f64 d) d) d))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 h (*.f64 (*.f64 (neg.f64 d) d) d)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 h)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (neg.f64 d) d) d))))
(*.f64 (sqrt.f64 (neg.f64 h)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (neg.f64 d) d) d)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))))
(pow.f64 (exp.f64 (log.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) d)) (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) d) h) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 d (sqrt.f64 (/.f64 d h))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 d d) d) h) #s(literal -1/2 binary64))
(pow.f64 (/.f64 h (*.f64 (*.f64 d d) d)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (neg.f64 (/.f64 h (*.f64 d d)))) (sqrt.f64 (neg.f64 d)))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 d) d) d))))
(/.f64 (neg.f64 (sqrt.f64 h)) (neg.f64 (*.f64 (sqrt.f64 d) d)))
(/.f64 (sqrt.f64 (/.f64 h d)) d)
(/.f64 (/.f64 (sqrt.f64 h) d) (sqrt.f64 d))
(/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 d) d))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 (*.f64 d d) d) h))))
(/.f64 (sqrt.f64 (neg.f64 h)) (*.f64 (sqrt.f64 (neg.f64 d)) d))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d (/.f64 h (*.f64 d d)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) d) h) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (/.f64 d h))))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))
(exp.f64 (*.f64 (log.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 D D) l) (neg.f64 M)) M)
(*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) (/.f64 D l))
(*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 (*.f64 D D) l) M) (neg.f64 M))
(*.f64 #s(literal -1 binary64) (*.f64 M (*.f64 (/.f64 (*.f64 D D) l) M)))
(*.f64 (/.f64 (*.f64 D D) l) (*.f64 (neg.f64 M) M))
(*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l))
(*.f64 (neg.f64 M) (*.f64 (/.f64 (*.f64 D D) l) M))
(*.f64 (*.f64 D D) (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (neg.f64 M) M)))
(*.f64 M (*.f64 (neg.f64 M) (/.f64 (*.f64 D D) l)))
(*.f64 D (*.f64 (/.f64 D l) (*.f64 (neg.f64 M) M)))
(pow.f64 (/.f64 l (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (neg.f64 D) D) (*.f64 (neg.f64 M) M)) (neg.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 M) M)) (/.f64 l (*.f64 D D)))
(/.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (neg.f64 D) D)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (neg.f64 M) M) #s(literal 1 binary64)) (/.f64 l (*.f64 D D)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D) l)
(/.f64 (*.f64 (neg.f64 M) M) (/.f64 l (*.f64 D D)))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (*.f64 (neg.f64 M) M) D) D)))
(neg.f64 (*.f64 (/.f64 (*.f64 D D) l) (*.f64 M M)))
(neg.f64 (*.f64 (*.f64 M M) (/.f64 (*.f64 D D) l)))
(neg.f64 (*.f64 M (*.f64 (/.f64 (*.f64 D D) l) M)))

eval232.0ms (1.2%)

Memory
5.0MiB live, 363.9MiB allocated
Compiler

Compiled 46 029 to 2 240 computations (95.1% saved)

prune485.0ms (2.4%)

Memory
16.1MiB live, 627.7MiB allocated
Pruning

58 alts after pruning (55 fresh and 3 done)

PrunedKeptTotal
New1 776201 796
Fresh93544
Picked415
Done022
Total1 789581 847
Accuracy
94.7%
Counts
1 847 → 58
Alt Table
Click to see full alt table
StatusAccuracyProgram
30.7%
(/.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) d) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h)))
41.1%
(/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d)) #s(literal 1/2 binary64))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h)))
37.7%
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) d) (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
38.4%
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (*.f64 (/.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) d) (*.f64 D (/.f64 D d))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
40.8%
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (*.f64 (/.f64 D d) (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
17.6%
(/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))) D) (/.f64 D l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
16.5%
(/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) #s(approx (* (* -1/8 (sqrt (/ h (* (* d d) d)))) (* (* (neg M) M) (/ (* D D) l))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
20.6%
(/.f64 #s(approx (* (+ (* (* (neg (/ (* (* 1/4 D) M) (* l d))) (* M (* D (/ 1/2 d)))) h) 1) d) (/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) l)) (*.f64 d d)) d)) (sqrt.f64 (*.f64 l h)))
22.2%
(/.f64 #s(approx (* (+ (* (* (neg (/ (* (* 1/4 D) M) (* l d))) (* M (* D (/ 1/2 d)))) h) 1) d) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 h (*.f64 l d)) (/.f64 d (*.f64 D D))) (*.f64 D D))) (sqrt.f64 (*.f64 l h)))
28.9%
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
70.7%
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
70.2%
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
47.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
47.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
47.5%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
74.7%
(*.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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
29.9%
(*.f64 d (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (*.f64 l h))))
27.1%
#s(approx (/ (* (+ (* (* (neg (/ (* (* 1/4 D) M) (* l d))) (* M (* D (/ 1/2 d)))) h) 1) d) (sqrt (* l h))) (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) 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))
14.7%
#s(approx (/ (* (+ (* (* (neg (/ (* (* 1/4 D) M) (* l d))) (* M (* D (/ 1/2 d)))) h) 1) d) (sqrt (* l 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))))))
27.8%
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (sqrt (neg d))) (sqrt (neg 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))))))
23.3%
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (sqrt (neg d))) (sqrt (neg l))) (*.f64 (neg.f64 d) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.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))))))
31.3%
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (sqrt (neg d))) (sqrt (neg l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
3.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (neg.f64 h))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (neg.f64 d))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 h)))) (sqrt.f64 (neg.f64 l))))
12.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (*.f64 l h)))) l) l))
3.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 h h) h)) (+.f64 #s(literal 0 binary64) (fma.f64 h h (*.f64 #s(literal 0 binary64) h)))))) (sqrt.f64 (neg.f64 l))))
5.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 h h)) (+.f64 #s(literal 0 binary64) h)))) (sqrt.f64 (neg.f64 l))))
3.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))
23.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
23.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 d (sqrt.f64 h)) (sqrt.f64 l)))
3.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (neg.f64 h))))
22.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
17.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 (/.f64 d h) d)) (sqrt.f64 l)))
2.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (neg.f64 d) (*.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 (sqrt.f64 (neg.f64 h))))))
11.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (*.f64 D D) (sqrt.f64 (*.f64 l h)))) d)) (*.f64 l l)))
24.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 l h))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 h h) h))) d)) h)) (*.f64 l l)))
12.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (*.f64 l h))) (*.f64 #s(literal -1/8 binary64) M)) M)) (*.f64 l l)))
9.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)) (*.f64 l l)))
10.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (*.f64 (neg.f64 d) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 l l)))
23.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓22.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 d (sqrt.f64 (*.f64 l h))))
22.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
22.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 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))))))
2.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 (neg.f64 h)) d) (sqrt.f64 (neg.f64 l)))))
22.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 l h)) (/.f64 #s(literal 1 binary64) d))))
26.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l (*.f64 d d)) h))))
31.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (/ l (* d (/ d h)))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
2.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 (neg.f64 h))) d))
2.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))))
22.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d))
17.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 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
43.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 l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
20.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 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d))
24.1%
#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))))
30.0%
#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 (*.f64 l h)) d)))
28.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h)))))
28.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (neg.f64 d) (*.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 (sqrt.f64 (neg.f64 h)))))))
✓42.1%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
Compiler

Compiled 4 373 to 1 452 computations (66.8% saved)

regimes361.0ms (1.8%)

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

7 calls:

86.0ms
M
57.0ms
h
48.0ms
l
45.0ms
(*.f64 M D)
44.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
83.9%2d
83.9%2h
83.9%2l
74.7%1M
74.7%1D
82.9%3(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
74.7%1(*.f64 M D)
Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes180.0ms (0.9%)

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

4 calls:

65.0ms
h
43.0ms
l
42.0ms
d
23.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
82.9%3(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
78.8%2h
81.0%3l
81.6%3d
Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes49.0ms (0.2%)

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

1 calls:

22.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
81.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)

regimes152.0ms (0.8%)

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

4 calls:

45.0ms
l
44.0ms
d
24.0ms
h
21.0ms
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Results
AccuracySegmentsBranch
76.9%2h
79.7%3l
80.0%3d
81.0%4(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes96.0ms (0.5%)

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

2 calls:

47.0ms
l
43.0ms
d
Results
AccuracySegmentsBranch
79.7%3l
76.9%2d
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes86.0ms (0.4%)

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

2 calls:

43.0ms
l
38.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
81.0%4(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
78.9%3l
Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes23.0ms (0.1%)

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

1 calls:

18.0ms
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Results
AccuracySegmentsBranch
80.6%4(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Compiler

Compiled 40 to 22 computations (45% saved)

regimes239.0ms (1.2%)

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

7 calls:

58.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))))
46.0ms
D
32.0ms
l
24.0ms
h
24.0ms
(*.f64 M D)
Results
AccuracySegmentsBranch
59.2%2M
56.5%3D
59.1%2(*.f64 M D)
73.8%4d
70.6%4h
71.5%4l
71.4%4(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes27.0ms (0.1%)

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

1 calls:

23.0ms
d
Results
AccuracySegmentsBranch
73.3%4d
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes30.0ms (0.1%)

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

1 calls:

25.0ms
d
Results
AccuracySegmentsBranch
73.3%4d
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes26.0ms (0.1%)

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

1 calls:

19.0ms
d
Results
AccuracySegmentsBranch
73.3%4d
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes25.0ms (0.1%)

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

1 calls:

20.0ms
d
Results
AccuracySegmentsBranch
72.5%4d
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes61.0ms (0.3%)

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

3 calls:

21.0ms
l
19.0ms
d
18.0ms
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Results
AccuracySegmentsBranch
64.3%4(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
70.7%4l
69.4%3d
Compiler

Compiled 52 to 32 computations (38.5% saved)

regimes59.0ms (0.3%)

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

3 calls:

19.0ms
h
18.0ms
d
18.0ms
l
Results
AccuracySegmentsBranch
64.8%2h
67.5%3l
68.7%3d
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes105.0ms (0.5%)

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

3 calls:

53.0ms
l
23.0ms
d
16.0ms
h
Results
AccuracySegmentsBranch
58.0%2h
66.1%4l
61.9%3d
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes23.0ms (0.1%)

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

1 calls:

15.0ms
l
Results
AccuracySegmentsBranch
65.3%4l
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes33.0ms (0.2%)

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

2 calls:

15.0ms
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
14.0ms
l
Results
AccuracySegmentsBranch
64.3%4(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
60.5%4l
Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes97.0ms (0.5%)

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

5 calls:

48.0ms
h
13.0ms
M
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))))
11.0ms
d
11.0ms
(*.f64 M D)
Results
AccuracySegmentsBranch
52.1%2h
50.9%2(*.f64 M D)
50.9%2M
53.9%3d
61.1%4(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Compiler

Compiled 66 to 43 computations (34.8% saved)

regimes26.0ms (0.1%)

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

2 calls:

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

Compiled 46 to 27 computations (41.3% saved)

regimes25.0ms (0.1%)

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

2 calls:

13.0ms
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
48.6%3D
55.8%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)

regimes23.0ms (0.1%)

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

3 calls:

9.0ms
d
7.0ms
l
6.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
52.1%2d
53.7%3l
47.2%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 52 to 32 computations (38.5% saved)

regimes35.0ms (0.2%)

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

5 calls:

9.0ms
h
7.0ms
(*.f64 M D)
6.0ms
d
6.0ms
l
6.0ms
M
Results
AccuracySegmentsBranch
44.7%2(*.f64 M D)
44.3%2M
48.8%2d
48.4%2h
49.6%2l
Compiler

Compiled 32 to 26 computations (18.8% saved)

regimes5.0ms (0%)

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

1 calls:

4.0ms
l
Results
AccuracySegmentsBranch
49.3%2l
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes16.0ms (0.1%)

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

4 calls:

4.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))))
3.0ms
l
3.0ms
d
3.0ms
h
Results
AccuracySegmentsBranch
47.2%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))))
42.1%1h
42.1%1d
43.8%2l
Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes5.0ms (0%)

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

2 calls:

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

Compiled 46 to 27 computations (41.3% saved)

regimes25.0ms (0.1%)

Memory
-16.5MiB live, 22.3MiB allocated
Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
Outputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
Calls

7 calls:

17.0ms
h
1.0ms
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
1.0ms
D
1.0ms
d
1.0ms
(*.f64 M D)
Results
AccuracySegmentsBranch
22.8%1h
22.8%1d
22.8%1l
22.8%1D
22.8%1M
22.8%1(*.f64 M D)
22.8%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))))
Compiler

Compiled 78 to 53 computations (32.1% saved)

bsearch92.0ms (0.5%)

Memory
10.8MiB live, 124.2MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
83.0ms
-2.1799317240314692e-301
3.5381167621334946e-305
Samples
50.0ms160×0valid
19.0ms161×0invalid
Compiler

Compiled 843 to 580 computations (31.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 58.0ms
ival-pow: 32.0ms (54.9% of total)
ival-div: 11.0ms (18.9% of total)
ival-mult: 10.0ms (17.2% of total)
ival-pow2: 3.0ms (5.1% of total)
ival-sub: 2.0ms (3.4% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
2.9MiB live, 2.9MiB allocated
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
1.4963065580513473e+264
+inf
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory
2.1MiB live, 2.1MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
1.4963065580513473e+264
+inf
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch51.0ms (0.3%)

Memory
7.6MiB live, 86.4MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
-2.1799317240314692e-301
3.5381167621334946e-305
45.0ms
-1.7172156944206776e-65
-3.328915118946028e-67
Samples
21.0ms112×0valid
17.0ms80×0invalid
Compiler

Compiled 1 329 to 918 computations (30.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 31.0ms
ival-mult: 13.0ms (41.5% of total)
ival-pow: 8.0ms (25.5% of total)
ival-div: 7.0ms (22.3% of total)
ival-pow2: 2.0ms (6.4% of total)
ival-sub: 1.0ms (3.2% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch131.0ms (0.6%)

Memory
11.7MiB live, 171.3MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
95.0ms
-3.318785436138209e-305
9.066265123119297e-304
27.0ms
-5.67136689336726e+77
-1.937440684571118e+77
Samples
52.0ms194×0invalid
49.0ms224×0valid
Compiler

Compiled 1 057 to 717 computations (32.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 87.0ms
ival-div: 54.0ms (61.7% of total)
ival-mult: 13.0ms (14.9% of total)
ival-pow: 13.0ms (14.9% of total)
ival-pow2: 4.0ms (4.6% of total)
ival-sub: 2.0ms (2.3% 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.0MiB live, 3.0MiB allocated
Algorithm
3×left-value
Steps
TimeLeftRight
0.0ms
1.4963065580513473e+264
+inf
0.0ms
0.0
1.0338981218499855e-269
0.0ms
-1.5126099688046325e-167
0.0
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory
2.1MiB live, 2.1MiB allocated
Algorithm
3×left-value
Steps
TimeLeftRight
0.0ms
1.4963065580513473e+264
+inf
0.0ms
0.0
1.0338981218499855e-269
0.0ms
-1.5126099688046325e-167
0.0
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch209.0ms (1%)

Memory
-5.5MiB live, 346.4MiB allocated
Algorithm
3×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
45.0ms
-1.8080777947947832e-295
-1.3216784845921499e-298
52.0ms
-4.076198906153507e-123
-1.813193848586737e-132
53.0ms
-3.1212021952632175e+106
-1.9530177751166565e+93
Samples
76.0ms432×0valid
48.0ms325×0invalid
Compiler

Compiled 1 789 to 1 216 computations (32% saved)

Precisions
Click to see histograms. Total time spent on operations: 93.0ms
ival-div: 29.0ms (31.2% of total)
ival-mult: 26.0ms (28% of total)
ival-pow: 26.0ms (28% of total)
ival-pow2: 8.0ms (8.6% of total)
ival-sub: 3.0ms (3.2% of total)
ival-true: 1.0ms (1.1% of total)
exact: 1.0ms (1.1% of total)
ival-assert: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory
7.4MiB live, 7.3MiB allocated
Algorithm
3×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
-1.8080777947947832e-295
-1.3216784845921499e-298
1.0ms
-4.076198906153507e-123
-1.813193848586737e-132
1.0ms
-3.1212021952632175e+106
-1.9530177751166565e+93
Compiler

Compiled 1 789 to 1 216 computations (32% saved)

bsearch59.0ms (0.3%)

Memory
-13.3MiB live, 104.3MiB allocated
Algorithm
3×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
4.0ms
-1.8080777947947832e-295
-1.3216784845921499e-298
48.0ms
-7.432857170054407e-118
-4.076198906153507e-123
1.0ms
-3.1212021952632175e+106
-1.9530177751166565e+93
Samples
22.0ms144×0valid
15.0ms109×0invalid
Compiler

Compiled 1 789 to 1 216 computations (32% saved)

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

bsearch4.0ms (0%)

Memory
7.2MiB live, 7.2MiB allocated
Algorithm
3×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
-1.8080777947947832e-295
-1.3216784845921499e-298
1.0ms
-7.432857170054407e-118
-4.076198906153507e-123
1.0ms
-3.1212021952632175e+106
-1.9530177751166565e+93
Compiler

Compiled 1 789 to 1 199 computations (33% saved)

bsearch28.0ms (0.1%)

Memory
13.5MiB live, 51.5MiB allocated
Algorithm
3×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
-2.1799317240314692e-301
3.5381167621334946e-305
22.0ms
-4.1845723838013994e-138
-2.3673981657947744e-138
1.0ms
-3.1212021952632175e+106
-1.9530177751166565e+93
Samples
11.0ms64×0valid
6.0ms53×0invalid
Compiler

Compiled 1 585 to 1 072 computations (32.4% saved)

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

bsearch64.0ms (0.3%)

Memory
-31.4MiB live, 98.9MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
10.0ms
-2.1799317240314692e-301
3.5381167621334946e-305
48.0ms
-1.2792564006587817e-76
-5.7346705557854104e-83
Samples
24.0ms144×0valid
16.0ms122×0invalid
Compiler

Compiled 1 267 to 861 computations (32% saved)

Precisions
Click to see histograms. Total time spent on operations: 30.0ms
ival-mult: 10.0ms (32.9% of total)
ival-div: 9.0ms (29.6% of total)
ival-pow: 6.0ms (19.7% of total)
ival-pow2: 4.0ms (13.1% 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)

bsearch45.0ms (0.2%)

Memory
3.4MiB live, 79.6MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
-2.1799317240314692e-301
3.5381167621334946e-305
38.0ms
-7.432857170054407e-118
-4.076198906153507e-123
Samples
17.0ms112×0valid
14.0ms101×0invalid
Compiler

Compiled 1 059 to 710 computations (33% saved)

Precisions
Click to see histograms. Total time spent on operations: 22.0ms
ival-div: 7.0ms (31.4% of total)
ival-mult: 7.0ms (31.4% of total)
ival-pow: 5.0ms (22.4% of total)
ival-pow2: 2.0ms (9% of total)
ival-sub: 1.0ms (4.5% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch230.0ms (1.1%)

Memory
29.7MiB live, 418.8MiB allocated
Algorithm
3×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
107.0ms
9.574009334240041e+63
7.793532487831832e+69
57.0ms
-3.700049140726975e-286
-4.042963450038112e-297
45.0ms
-3.7153925955476027e-168
-1.5634147473738235e-169
Samples
115.0ms386×0invalid
68.0ms416×0valid
Compiler

Compiled 1 303 to 864 computations (33.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 152.0ms
ival-mult: 69.0ms (45.4% of total)
ival-div: 39.0ms (25.7% of total)
ival-pow: 31.0ms (20.4% of total)
ival-pow2: 8.0ms (5.3% of total)
ival-sub: 4.0ms (2.6% of total)
ival-true: 1.0ms (0.7% of total)
exact: 1.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory
11.8MiB live, 11.8MiB allocated
Algorithm
3×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
9.574009334240041e+63
7.793532487831832e+69
1.0ms
-3.318785436138209e-305
9.066265123119297e-304
1.0ms
-3.7153925955476027e-168
-1.5634147473738235e-169
Compiler

Compiled 1 248 to 829 computations (33.6% saved)

bsearch3.0ms (0%)

Memory
-35.6MiB live, 2.7MiB allocated
Algorithm
3×left-value
Steps
TimeLeftRight
2.0ms
1.4963065580513473e+264
+inf
0.0ms
0.0
1.0338981218499855e-269
0.0ms
-1.4634259358752783e+93
-1.8824391148628693e+42
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory
2.3MiB live, 2.3MiB allocated
Algorithm
3×left-value
Steps
TimeLeftRight
0.0ms
1.4963065580513473e+264
+inf
0.0ms
0.0
1.0338981218499855e-269
0.0ms
-1.0513534795037558e+202
-2.518877376519935e+118
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory
2.2MiB live, 2.2MiB allocated
Algorithm
3×left-value
Steps
TimeLeftRight
0.0ms
1.4963065580513473e+264
+inf
0.0ms
0.0
1.0338981218499855e-269
0.0ms
-1.5126099688046325e-167
0.0
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch0.0ms (0%)

Memory
1.5MiB live, 1.6MiB allocated
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
1.4963065580513473e+264
+inf
0.0ms
0.0
1.0338981218499855e-269
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch60.0ms (0.3%)

Memory
12.1MiB live, 148.6MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
54.0ms
2.5952067977907808e-228
2.1564994524610414e-226
1.0ms
-3.318785436138209e-305
9.066265123119297e-304
Samples
29.0ms145×0invalid
17.0ms112×0valid
Compiler

Compiled 568 to 427 computations (24.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 37.0ms
ival-div: 13.0ms (35% of total)
ival-pow: 11.0ms (29.6% of total)
ival-mult: 9.0ms (24.3% of total)
ival-pow2: 2.0ms (5.4% of total)
ival-sub: 1.0ms (2.7% 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.3MiB live, 2.3MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
2.5952067977907808e-228
2.1564994524610414e-226
Compiler

Compiled 260 to 184 computations (29.2% saved)

bsearch1.0ms (0%)

Memory
2.0MiB live, 2.0MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
2.5952067977907808e-228
2.1564994524610414e-226
Compiler

Compiled 253 to 184 computations (27.3% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
-1.8824391148628693e+42
-1.244043487020007e-29
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch3.0ms (0%)

Memory
-38.5MiB live, 0.8MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
2.0ms
-1.8824391148628693e+42
-1.244043487020007e-29
Compiler

Compiled 43 to 30 computations (30.2% saved)

simplify281.0ms (1.4%)

Memory
21.3MiB live, 140.7MiB allocated
Algorithm
1×egg-herbie
Rules
1 448×distribute-lft-neg-in_binary64
1 434×neg-mul-1_binary64
862×neg-sub0_binary64
670×distribute-lft-neg-out_binary64
656×*-commutative_binary64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
03384124
14714120
25924116
37564116
49204116
511324116
617074116
725234116
832484116
940144116
1045734116
1146294116
1246444116
1346464116
1448844116
1550934116
1652294116
1753474116
1854794116
1955954116
2056734116
2157014116
2257044116
2357044116
Stop Event
1×saturated
Calls
Call 1
Inputs
(if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d)) #s(literal 1/2 binary64))) h #s(literal 1 binary64)) 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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 d #s(literal -2845706385096283/237142198758023568227473377297792835283496928595231875152809132048206089502588928 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (*.f64 (/.f64 D d) (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) d) (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal -429999999999999991310973036577526963581745198397338277464330621910353694425088 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (*.f64 (/.f64 D d) (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.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 -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -739230056714827/399583814440447005616844445413525287135820562261116307309972090832047582568929999375399181192126972308457847183540047730617340886948900519205142528 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 d #s(literal -795241916682773/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))) D) (/.f64 D l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -739230056714827/399583814440447005616844445413525287135820562261116307309972090832047582568929999375399181192126972308457847183540047730617340886948900519205142528 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -795241916682773/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))) D) (/.f64 D l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -762889925020669/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -795241916682773/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -762889925020669/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -795241916682773/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) #s(approx (* (* -1/8 (sqrt (/ h (* (* d d) d)))) (* (* (neg M) M) (/ (* D D) l))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -5363123171977039/1675975991242824637446753124775730765934920727574049172215445180465220503759193372100234287270862928461253982273310756356719235351493321243304206125760512 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (sqrt (neg d))) (sqrt (neg 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)))))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -5345182401901691/260740604970814219042361048116400404614587954389239840081425977517360806369707098391474864128 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (neg.f64 d) (*.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 (sqrt.f64 (neg.f64 h))))))) (if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (sqrt (neg d))) (sqrt (neg 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)))))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -1162941958872971/2907354897182427562197295231552018137414565442749272241125960796722557152453591693304764202855054262243050086425064711734138406514458624 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -101201126653655/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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal -6628602150353253/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (neg.f64 d) (*.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 (sqrt.f64 (neg.f64 h))))))) (if (<=.f64 l #s(literal -3018973942962379/736335108039604595805923406147184530889923370574768772191969612422073040099331944991573923112581267542507986451953227192970402893063850485730703075899286013451337291468249027691733891486704001513279827771740183629161065194874727962517148100775228363421083691764065477590823919364012917984605619526140822066036736 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 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)) (if (<=.f64 l #s(literal 7600000000000000551238916499622186958803645513313566861938397181640704 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) d) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 l #s(literal -6628602150353253/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (neg.f64 d) (*.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 (sqrt.f64 (neg.f64 h))))))) (if (<=.f64 l #s(literal -101201126653655/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 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)) (if (<=.f64 l #s(literal 7600000000000000551238916499622186958803645513313566861938397181640704 binary64)) (*.f64 d (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (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 -1000000000000000043377296974619186073290293324951939311791773789336116812889681110941323755520 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (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 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.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 -9999999999999999017474591319641730272072128367390393282944984404433823148266910656903077218579754480674748342103902584639871831041306548820316951909258721342916786285447187693014154661313392524876840960 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 #s(literal -1/8 binary64) (*.f64 M M)) (*.f64 (/.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 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.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 -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 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 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.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 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (/ l (* d (/ d h)))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))))
(if (<=.f64 l #s(literal -101201126653655/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)))) (fabs.f64 (/.f64 (neg.f64 d) (*.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 (sqrt.f64 (neg.f64 h))))))) (if (<=.f64 l #s(literal 8022954965641041/1707011694817242694164442058424641996069058130512872489061441999811593532881313810309486643423117898430190057111918909554147533223454557460573019149396692491800360340355587726966548041193424390330615044130786970107312831497593974090537952608256 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal 8022954965641041/1707011694817242694164442058424641996069058130512872489061441999811593532881313810309486643423117898430190057111918909554147533223454557460573019149396692491800360340355587726966548041193424390330615044130786970107312831497593974090537952608256 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (/ l (* d (/ d h)))) (/.f64 (sqrt.f64 (*.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 l #s(literal 8022954965641041/1707011694817242694164442058424641996069058130512872489061441999811593532881313810309486643423117898430190057111918909554147533223454557460573019149396692491800360340355587726966548041193424390330615044130786970107312831497593974090537952608256 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 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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 -1000000000000000044885712678075916785549312 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)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
(if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (/.f64 (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) d) l))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) (*.f64 (neg.f64 l) d))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 h) (sqrt.f64 l))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d)) #s(literal 1/2 binary64))) h #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h)))))
(if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (/.f64 (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) d) l)))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) (/.f64 (*.f64 (fma.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d)) #s(literal 1/2 binary64)) (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) (*.f64 (neg.f64 l) d))) h #s(literal 1 binary64)) 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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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/4 binary64) D) M) d) l) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (/.f64 (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 d #s(literal -2845706385096283/237142198758023568227473377297792835283496928595231875152809132048206089502588928 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (*.f64 (/.f64 D d) (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) d) (*.f64 (*.f64 (*.f64 (*.f64 D D) M) M) (/.f64 #s(literal 1/4 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -2845706385096283/237142198758023568227473377297792835283496928595231875152809132048206089502588928 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D) d) (/.f64 D d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) d) (*.f64 (/.f64 #s(literal 1/4 binary64) d) (*.f64 (*.f64 (*.f64 D D) M) M)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) (*.f64 (neg.f64 l) d))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))
(if (<=.f64 l #s(literal -429999999999999991310973036577526963581745198397338277464330621910353694425088 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (*.f64 (/.f64 D d) (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal -429999999999999991310973036577526963581745198397338277464330621910353694425088 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) D) d) (/.f64 D d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) (*.f64 (neg.f64 l) d))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.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 -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -739230056714827/399583814440447005616844445413525287135820562261116307309972090832047582568929999375399181192126972308457847183540047730617340886948900519205142528 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 d #s(literal -795241916682773/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))) D) (/.f64 D l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -739230056714827/399583814440447005616844445413525287135820562261116307309972090832047582568929999375399181192126972308457847183540047730617340886948900519205142528 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 d #s(literal -795241916682773/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (neg.f64 D) l) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 M M)) D))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) (*.f64 (neg.f64 l) d))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -739230056714827/399583814440447005616844445413525287135820562261116307309972090832047582568929999375399181192126972308457847183540047730617340886948900519205142528 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -795241916682773/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d))) #s(literal -1/8 binary64))) D) (/.f64 D l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -739230056714827/399583814440447005616844445413525287135820562261116307309972090832047582568929999375399181192126972308457847183540047730617340886948900519205142528 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) h) (*.f64 (*.f64 d d) l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -795241916682773/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (/.f64 (neg.f64 D) l) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 M M)) D))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) (*.f64 (neg.f64 l) d))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -762889925020669/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -795241916682773/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -762889925020669/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) h) (*.f64 (*.f64 d d) l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -795241916682773/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (*.f64 (*.f64 (neg.f64 #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))) (*.f64 (/.f64 (*.f64 D D) l) (*.f64 M M)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) (*.f64 (neg.f64 l) d))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -762889925020669/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -795241916682773/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) #s(approx (* (* -1/8 (sqrt (/ h (* (* d d) d)))) (* (* (neg M) M) (/ (* D D) l))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -762889925020669/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) h) (*.f64 (*.f64 d d) l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -795241916682773/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) #s(approx (* (* -1/8 (sqrt (/ h (* (* d d) d)))) (* (* (neg M) M) (/ (* D D) l))) (*.f64 (*.f64 (/.f64 (*.f64 M M) l) (*.f64 #s(literal 1/8 binary64) (*.f64 D D))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) (*.f64 (neg.f64 l) d))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -5363123171977039/1675975991242824637446753124775730765934920727574049172215445180465220503759193372100234287270862928461253982273310756356719235351493321243304206125760512 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (*.f64 h (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (sqrt (neg d))) (sqrt (neg 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)))))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -699999999999999952851957010060070505201399394770602498012487757478163076497554382089814342853722112 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -5363123171977039/1675975991242824637446753124775730765934920727574049172215445180465220503759193372100234287270862928461253982273310756356719235351493321243304206125760512 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (*.f64 M M)) h) (*.f64 (*.f64 d d) l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 (*.f64 (*.f64 (*.f64 (neg.f64 D) D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (neg.f64 d)))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) (*.f64 (neg.f64 l) d))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))
(if (<=.f64 d #s(literal -5345182401901691/260740604970814219042361048116400404614587954389239840081425977517360806369707098391474864128 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (neg.f64 d) (*.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 (sqrt.f64 (neg.f64 h))))))) (if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (sqrt (neg d))) (sqrt (neg 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)))))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -5345182401901691/260740604970814219042361048116400404614587954389239840081425977517360806369707098391474864128 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (*.f64 (sqrt.f64 (neg.f64 h)) (sqrt.f64 (neg.f64 l)))))) (if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (/ (* (* D D) (* (* M M) 1/4)) (* d d))) 1) (sqrt (/ d h))) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 (*.f64 (*.f64 (*.f64 (neg.f64 D) D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (neg.f64 d)))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) (*.f64 (neg.f64 l) d))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))
(if (<=.f64 d #s(literal -1162941958872971/2907354897182427562197295231552018137414565442749272241125960796722557152453591693304764202855054262243050086425064711734138406514458624 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -101201126653655/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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) (/.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -1162941958872971/2907354897182427562197295231552018137414565442749272241125960796722557152453591693304764202855054262243050086425064711734138406514458624 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -101201126653655/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 (*.f64 (/.f64 (*.f64 M M) d) (*.f64 #s(literal 1/8 binary64) (*.f64 D D))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (*.f64 M (*.f64 D #s(literal 1/4 binary64))) (*.f64 (neg.f64 l) d))) h #s(literal 1 binary64)) d) (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))
(if (<=.f64 l #s(literal -6628602150353253/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (neg.f64 d) (*.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 (sqrt.f64 (neg.f64 h))))))) (if (<=.f64 l #s(literal -3018973942962379/736335108039604595805923406147184530889923370574768772191969612422073040099331944991573923112581267542507986451953227192970402893063850485730703075899286013451337291468249027691733891486704001513279827771740183629161065194874727962517148100775228363421083691764065477590823919364012917984605619526140822066036736 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 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)) (if (<=.f64 l #s(literal 7600000000000000551238916499622186958803645513313566861938397181640704 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) d) (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) 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 l #s(literal -6628602150353253/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (*.f64 (sqrt.f64 (neg.f64 h)) (sqrt.f64 (neg.f64 l)))))) (if (<=.f64 l #s(literal -3018973942962379/736335108039604595805923406147184530889923370574768772191969612422073040099331944991573923112581267542507986451953227192970402893063850485730703075899286013451337291468249027691733891486704001513279827771740183629161065194874727962517148100775228363421083691764065477590823919364012917984605619526140822066036736 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 (sqrt.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 l h)) (/.f64 #s(literal -1 binary64) (*.f64 l h))))) d)) (if (<=.f64 l #s(literal 7600000000000000551238916499622186958803645513313566861938397181640704 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) d) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) h #s(literal 1 binary64)) 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 h) (sqrt.f64 l)))))))
(if (<=.f64 l #s(literal -6628602150353253/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (neg.f64 d) (*.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 (sqrt.f64 (neg.f64 h))))))) (if (<=.f64 l #s(literal -101201126653655/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 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)) (if (<=.f64 l #s(literal 7600000000000000551238916499622186958803645513313566861938397181640704 binary64)) (*.f64 d (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (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 l #s(literal -6628602150353253/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (*.f64 (sqrt.f64 (neg.f64 h)) (sqrt.f64 (neg.f64 l)))))) (if (<=.f64 l #s(literal -101201126653655/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 (sqrt.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 l h)) (/.f64 #s(literal -1 binary64) (*.f64 l h))))) d)) (if (<=.f64 l #s(literal 7600000000000000551238916499622186958803645513313566861938397181640704 binary64)) (*.f64 (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) (*.f64 l d)) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) h) #s(literal 1 binary64)) (sqrt.f64 (*.f64 l h))) d) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000043377296974619186073290293324951939311791773789336116812889681110941323755520 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (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 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal -1000000000000000043377296974619186073290293324951939311791773789336116812889681110941323755520 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (/.f64 (*.f64 M M) d) (*.f64 #s(literal 1/8 binary64) (*.f64 D D))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.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 -9999999999999999017474591319641730272072128367390393282944984404433823148266910656903077218579754480674748342103902584639871831041306548820316951909258721342916786285447187693014154661313392524876840960 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 #s(literal -1/8 binary64) (*.f64 M M)) (*.f64 (/.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 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal -9999999999999999017474591319641730272072128367390393282944984404433823148266910656903077218579754480674748342103902584639871831041306548820316951909258721342916786285447187693014154661313392524876840960 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) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 #s(literal -1/8 binary64) (*.f64 M M)))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.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 -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 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 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 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 (sqrt.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 l h)) (/.f64 #s(literal -1 binary64) (*.f64 l h))))) d)) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.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 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (/ l (* d (/ d h)))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 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 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))))
(if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (/ l (* d (/ d h)))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d))))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))))
(if (<=.f64 l #s(literal -101201126653655/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)))) (fabs.f64 (/.f64 (neg.f64 d) (*.f64 (sqrt.f64 (neg.f64 l)) (neg.f64 (sqrt.f64 (neg.f64 h))))))) (if (<=.f64 l #s(literal 8022954965641041/1707011694817242694164442058424641996069058130512872489061441999811593532881313810309486643423117898430190057111918909554147533223454557460573019149396692491800360340355587726966548041193424390330615044130786970107312831497593974090537952608256 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -101201126653655/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)))) (fabs.f64 (/.f64 d (*.f64 (sqrt.f64 (neg.f64 h)) (sqrt.f64 (neg.f64 l)))))) (if (<=.f64 l #s(literal 8022954965641041/1707011694817242694164442058424641996069058130512872489061441999811593532881313810309486643423117898430190057111918909554147533223454557460573019149396692491800360340355587726966548041193424390330615044130786970107312831497593974090537952608256 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 h) (sqrt.f64 l))))))
(if (<=.f64 l #s(literal 8022954965641041/1707011694817242694164442058424641996069058130512872489061441999811593532881313810309486643423117898430190057111918909554147533223454557460573019149396692491800360340355587726966548041193424390330615044130786970107312831497593974090537952608256 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (/ l (* d (/ d h)))) (/.f64 (sqrt.f64 (*.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 l #s(literal 8022954965641041/1707011694817242694164442058424641996069058130512872489061441999811593532881313810309486643423117898430190057111918909554147533223454557460573019149396692491800360340355587726966548041193424390330615044130786970107312831497593974090537952608256 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (/ l (* d (/ d h)))) (/.f64 (sqrt.f64 (*.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 h) (sqrt.f64 l)))))
(if (<=.f64 l #s(literal 8022954965641041/1707011694817242694164442058424641996069058130512872489061441999811593532881313810309486643423117898430190057111918909554147533223454557460573019149396692491800360340355587726966548041193424390330615044130786970107312831497593974090537952608256 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 8022954965641041/1707011694817242694164442058424641996069058130512872489061441999811593532881313810309486643423117898430190057111918909554147533223454557460573019149396692491800360340355587726966548041193424390330615044130786970107312831497593974090537952608256 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 h) (sqrt.f64 l)))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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 -1000000000000000044885712678075916785549312 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)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(literal -1000000000000000044885712678075916785549312 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)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.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.8s (14.1%)

Memory
10.7MiB live, 2 085.5MiB allocated
Rules
8 310×lower-*.f64
8 310×lower-*.f32
7 680×lower-*.f32
7 638×lower-*.f64
7 446×lower-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0104569
0154544
1501499
23491486
010716476
037817797
1116217291
2432317214
3643017193
0843116773
01203277
13213193
211473183
326353164
454943164
085383125
079405
0132396
1437348
23245338
09488332
035419938
1107419279
2399319225
3752219165
0805018790
02264
03860
112459
282859
0872658
081397
0137380
1476331
23509319
010409316
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×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
Compiler

Compiled 6 785 to 2 618 computations (61.4% saved)

preprocess228.0ms (1.1%)

Memory
25.3MiB live, 333.1MiB allocated
Remove

(abs D)

Compiler

Compiled 5 832 to 1 012 computations (82.6% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...