Henrywood and Agarwal, Equation (13)

Time bar (total: 9.6s)

start0.0ms (0%)

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

analyze1.1s (11.4%)

Memory
-32.1MiB live, 1 094.6MiB allocated; 920ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.7%0.3%0%0%0%0
0%0%99.7%0.3%0%0%0%1
0%0%99.7%0.3%0%0%0%2
0%0%99.7%0.3%0%0%0%3
0%0%99.7%0.3%0%0%0%4
0%0%99.7%0.3%0%0%0%5
0%0%99.7%0.3%0%0%0%6
0%0%99.7%0.3%0%0%0%7
0%0%99.7%0.3%0%0%0%8
0%0%99.7%0.3%0%0%0%9
0%0%99.7%0.3%0%0%0%10
0%0%99.7%0.3%0%0%0%11
0%0%99.7%0.3%0%0%0%12
Compiler

Compiled 54 to 23 computations (57.4% saved)

sample4.8s (50.2%)

Memory
87.7MiB live, 5 237.4MiB allocated; 1.9s collecting garbage
Samples
1.2s8 089×0invalid
976.0ms4 255×0valid
683.0ms1 775×2valid
368.0ms1 432×1valid
357.0ms794×3valid
Precisions
Click to see histograms. Total time spent on operations: 2.8s
ival-mult: 1.7s (59.7% of total)
ival-div: 385.0ms (13.8% of total)
adjust: 234.0ms (8.4% of total)
ival-sqrt: 207.0ms (7.4% of total)
ival-add: 160.0ms (5.7% of total)
ival-sub: 121.0ms (4.3% of total)
exact: 13.0ms (0.5% of total)
ival-assert: 5.0ms (0.2% of total)
Bogosity

explain435.0ms (4.5%)

Memory
25.0MiB live, 637.0MiB allocated; 102ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1150-0-(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))
710-4(4.728605666552914e+52 1.5843517979742957e-296 -1.4042244256336584e-123 2.3828774850556006e+48 -5.044915620437368e-61 1.1322257612250479e-187)(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))
540-1(-9.518212010838988e-164 2.103609747434407e+275 -3.3228314234549873e+133 -536.0500363360671 1.369126542430028e+211 4.950522843987533e-174)(sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))
480-0-(-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))
451(-2.9334783486436e+252 -1.6222021870418887e-139 -1.1402946587077483e-276 -9.848635415885068e+45 2.744548264738731e+209 5.050387131185788e+294)0-(*.f64 (*.f64 w h) (*.f64 D D))
400-1(1.7951941296212815e-149 5.643380300522702e-179 -1.2250101457515868e+280 1.2417040316622798e-129 4.239335343264577e-96 -3.832472086235928e-250)(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
340-2(-1.0258973123317477e+85 -7.964204403086244e-200 -3.084227529077602e-307 7.029862724886974e-117 -2.886180707573191e-158 2.389893579310993e+86)(*.f64 c0 (*.f64 d d))
00-0-D
00-0-(*.f64 M M)
00-0-d
00-0-(*.f64 d d)
00-0-(*.f64 w h)
00-0-(*.f64 #s(literal 2 binary64) w)
00-0-(*.f64 D D)
00-0-(*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))))
00-0-c0
00-0-#s(literal 2 binary64)
00-0-(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
00-0-w
00-0-h
00-0-M
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
+.f64(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))nan-rescue780
(*.f64 c0 (*.f64 d d))overflow116
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))overflow149
(*.f64 D D)overflow21
(*.f64 d d)overflow109
(*.f64 w h)overflow18
(*.f64 (*.f64 w h) (*.f64 D D))overflow21
(*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))))overflow195
(*.f64 M M)overflow48
(*.f64 c0 (*.f64 d d))overflow232
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))overflow298
(*.f64 D D)overflow42
(*.f64 w h)overflow36
(*.f64 (*.f64 w h) (*.f64 D D))overflow42
(-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))overflow195
(sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))overflow149
(*.f64 d d)overflow218
-.f64(-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))nan-rescue480
(*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))))overflow195
(*.f64 c0 (*.f64 d d))overflow232
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))overflow298
(*.f64 D D)overflow42
(*.f64 d d)overflow218
(*.f64 w h)overflow36
(*.f64 (*.f64 w h) (*.f64 D D))overflow42
(*.f64 M M)overflow48
sqrt.f64(sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))oflow-rescue460
(*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))))overflow195
(*.f64 M M)overflow48
(*.f64 c0 (*.f64 d d))overflow232
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))overflow298
(*.f64 D D)overflow42
(*.f64 w h)overflow36
(*.f64 (*.f64 w h) (*.f64 D D))overflow42
(-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))overflow195
(sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))overflow149
(*.f64 d d)overflow218
+.f64(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))cancellation370
*.f64(*.f64 c0 (*.f64 d d))n*o240
*.f64(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))o*u200
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))overflow47
(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))underflow82
(*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))))underflow7
(*.f64 M M)underflow74
(*.f64 c0 (*.f64 d d))underflow69
(*.f64 D D)underflow303
(*.f64 d d)underflow75
(*.f64 w h)underflow165
(*.f64 (*.f64 w h) (*.f64 D D))underflow324
(-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))underflow7
/.f64(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))u/u160
(*.f64 c0 (*.f64 d d))underflow23
(*.f64 d d)underflow25
(*.f64 D D)underflow101
(*.f64 w h)underflow55
(*.f64 (*.f64 w h) (*.f64 D D))underflow108
*.f64(*.f64 (*.f64 w h) (*.f64 D D))n*u150
/.f64(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))o/n150
(*.f64 c0 (*.f64 d d))overflow116
(*.f64 d d)overflow109
/.f64(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))o/o130
(*.f64 c0 (*.f64 d d))overflow116
(*.f64 d d)overflow109
(*.f64 D D)overflow21
(*.f64 w h)overflow18
(*.f64 (*.f64 w h) (*.f64 D D))overflow21
*.f64(*.f64 (*.f64 w h) (*.f64 D D))n*o100
*.f64(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))n*o80
/.f64(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))n/u80
(*.f64 D D)underflow101
(*.f64 w h)underflow55
(*.f64 (*.f64 w h) (*.f64 D D))underflow108
sqrt.f64(sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))uflow-rescue70
(*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))))underflow7
(*.f64 M M)underflow74
(*.f64 c0 (*.f64 d d))underflow46
(*.f64 D D)underflow202
(*.f64 d d)underflow50
(*.f64 w h)underflow110
(*.f64 (*.f64 w h) (*.f64 D D))underflow216
(-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))underflow7
*.f64(*.f64 (*.f64 w h) (*.f64 D D))o*u60
(*.f64 w h)overflow18
(*.f64 D D)underflow101
*.f64(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))n*u60
*.f64(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))u*o50
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))underflow19
(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))overflow71
(*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))))overflow195
(*.f64 M M)overflow48
(*.f64 c0 (*.f64 d d))overflow348
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))overflow447
(*.f64 D D)overflow63
(*.f64 w h)overflow54
(*.f64 (*.f64 w h) (*.f64 D D))overflow63
(-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))overflow195
(sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))overflow149
(*.f64 d d)overflow327
*.f64(*.f64 (*.f64 w h) (*.f64 D D))u*o40
(*.f64 w h)underflow55
(*.f64 D D)overflow21
*.f64(*.f64 c0 (*.f64 d d))n*u40
/.f64(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))n/o40
(*.f64 D D)overflow21
(*.f64 w h)overflow18
(*.f64 (*.f64 w h) (*.f64 D D))overflow21
/.f64(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))u/n20
(*.f64 c0 (*.f64 d d))underflow23
(*.f64 d d)underflow25
Confusion
Predicted +Predicted -
+1984
-1341
Precision
0.9383886255924171
Recall
0.9801980198019802
Confusion?
Predicted +Predicted MaybePredicted -
+19804
-13041
Precision?
0.9383886255924171
Recall?
0.9801980198019802
Freqs
test
numberfreq
045
186
292
326
47
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
58.0ms130×2valid
52.0ms62×3valid
33.0ms238×0valid
22.0ms82×1valid
Compiler

Compiled 536 to 67 computations (87.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 112.0ms
ival-mult: 59.0ms (52.6% of total)
ival-div: 17.0ms (15.2% of total)
adjust: 16.0ms (14.3% of total)
ival-sqrt: 9.0ms (8% of total)
ival-sub: 5.0ms (4.5% of total)
ival-add: 5.0ms (4.5% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

preprocess168.0ms (1.8%)

Memory
21.9MiB live, 163.9MiB allocated; 30ms collecting garbage
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
02171480
110611456
261471456
02152
03552
19252
251152
3520346
0814246
Stop Event
iter limit
node limit
iter limit
node limit
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Outputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(*.f64 (+.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 d D) (pow.f64 (/.f64 d D) #s(literal 3 binary64))) (/.f64 c0 (*.f64 h w))) (/.f64 c0 (*.f64 h w))) (*.f64 M M))) (*.f64 (*.f64 (/.f64 c0 (*.f64 h w)) d) (/.f64 d (*.f64 D D)))) (/.f64 c0 (*.f64 w #s(literal 2 binary64))))
Symmetry

(abs D)

(abs d)

(abs M)

Compiler

Compiled 52 to 21 computations (59.6% saved)

eval0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Compiler

Compiled 0 to 6 computations (-∞% saved)

prune1.0ms (0%)

Memory
1.0MiB live, 1.0MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
21.5%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Compiler

Compiled 52 to 21 computations (59.6% saved)

series161.0ms (1.7%)

Memory
-10.0MiB live, 227.7MiB allocated; 24ms collecting garbage
Counts
21 → 153
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))
(*.f64 c0 (*.f64 d d))
(*.f64 d d)
d
(*.f64 (*.f64 w h) (*.f64 D D))
(*.f64 w h)
h
(*.f64 D D)
D
(sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))
(-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))
(*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))))
(*.f64 M M)
M
Outputs
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (* c0 (* d d)) (* (* w h) (* D D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* c0 (* d d)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* -1 (pow M 2))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))) (pow M 2))))
#s(approx (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* (pow c0 2) (+ (* -1 (/ (pow M 2) (pow c0 2))) (/ (pow d 4) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* w h) (* D D)) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* w h) #s(hole binary64 (* h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow w 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow h 2)))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow h 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow w 2)))) (pow h 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx D #s(hole binary64 D))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow D 4) (pow M 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow h 2) (pow w 2)))) (pow D 4))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx d #s(hole binary64 d))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* (pow d 4) (+ (* -1 (/ (pow M 2) (pow d 4))) (/ (pow c0 2) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (+ (* -1 (pow M 2)) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))))))
#s(approx (* M M) #s(hole binary64 (pow M 2)))
#s(approx M #s(hole binary64 M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* (pow M 2) (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (pow w 2))))) 1))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
Calls

18 calls:

TimeVariablePointExpression
33.0ms
d
@inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)
13.0ms
w
@0
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)
11.0ms
D
@0
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)
11.0ms
c0
@0
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)
10.0ms
D
@-inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)

rewrite218.0ms (2.3%)

Memory
-8.8MiB live, 217.6MiB allocated; 39ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0105613977
0107811750
1637911750
0803911750
Stop Event
iter limit
node limit
iter limit
Counts
174 → 234
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))
(*.f64 c0 (*.f64 d d))
(*.f64 d d)
d
(*.f64 (*.f64 w h) (*.f64 D D))
(*.f64 w h)
h
(*.f64 D D)
D
(sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))
(-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))
(*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))))
(*.f64 M M)
M
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (* c0 (* d d)) (* (* w h) (* D D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* c0 (* d d)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* -1 (pow M 2))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))) (pow M 2))))
#s(approx (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* (pow c0 2) (+ (* -1 (/ (pow M 2) (pow c0 2))) (/ (pow d 4) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* w h) (* D D)) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* w h) #s(hole binary64 (* h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow w 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow h 2)))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow h 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow w 2)))) (pow h 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx D #s(hole binary64 D))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow D 4) (pow M 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow h 2) (pow w 2)))) (pow D 4))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx d #s(hole binary64 d))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* (pow d 4) (+ (* -1 (/ (pow M 2) (pow d 4))) (/ (pow c0 2) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (+ (* -1 (pow M 2)) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))))))
#s(approx (* M M) #s(hole binary64 (pow M 2)))
#s(approx M #s(hole binary64 M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* (pow M 2) (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (pow w 2))))) 1))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
Outputs
(*.f64 (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)))) (/.f64 c0 (*.f64 w #s(literal 2 binary64))))
(*.f64 (/.f64 c0 (*.f64 w #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)))))
(/.f64 (*.f64 c0 (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))))) (*.f64 w #s(literal 2 binary64)))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (/.f64 c0 (*.f64 w #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))) (/.f64 c0 (*.f64 w #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 c0 (*.f64 w #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (/.f64 c0 (*.f64 w #s(literal 2 binary64))) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)))))
(/.f64 (/.f64 c0 #s(literal 2 binary64)) w)
(/.f64 (neg.f64 c0) (neg.f64 (*.f64 w #s(literal 2 binary64))))
(/.f64 c0 (*.f64 w #s(literal 2 binary64)))
c0
(*.f64 w #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) w)
(+.f64 w w)
#s(literal 2 binary64)
w
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))))) (-.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 3 binary64)) (pow.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)) #s(literal 3/2 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (-.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)))) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)))))))
(+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))))
(+.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))
(*.f64 (/.f64 c0 (*.f64 h w)) (/.f64 (*.f64 d d) (*.f64 D D)))
(*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 h w)))
(*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 h w))
(/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w)) (*.f64 D D))
(/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (*.f64 c0 d) d)
(*.f64 (*.f64 d d) c0)
(*.f64 c0 (*.f64 d d))
(*.f64 (pow.f64 d #s(literal 1 binary64)) (pow.f64 d #s(literal 1 binary64)))
(*.f64 (neg.f64 d) (neg.f64 d))
(*.f64 (fabs.f64 d) (fabs.f64 d))
(*.f64 d d)
(pow.f64 d #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 d) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 d) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 d) #s(literal 2 binary64))))
d
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 (*.f64 D D) h) w)
(*.f64 (*.f64 h w) (*.f64 D D))
(*.f64 (*.f64 D D) (*.f64 h w))
(*.f64 w (*.f64 (*.f64 D D) h))
(*.f64 h w)
(*.f64 w h)
h
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (neg.f64 D) (neg.f64 D))
(*.f64 (fabs.f64 D) (fabs.f64 D))
(*.f64 D D)
(pow.f64 D #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 D) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 D) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 D) #s(literal 2 binary64))))
D
(*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) M) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) M) #s(literal 1/2 binary64)))
(pow.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)))
(exp.f64 (*.f64 (log.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) M) (-.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) M))
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) (pow.f64 M #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 6 binary64)) (pow.f64 M #s(literal 6 binary64))) (+.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) (+.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)))))
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))
(+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 (neg.f64 M) M))
(*.f64 (pow.f64 (/.f64 c0 (*.f64 h w)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 D D)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 c0 (*.f64 D D)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 h w)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 1 binary64)))
(*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (fabs.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))) (fabs.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))
(*.f64 (*.f64 c0 c0) (pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))
(pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (*.f64 (*.f64 h w) D) D))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 (*.f64 h w) D) D) (*.f64 (*.f64 (*.f64 h w) D) D)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)))
(*.f64 (pow.f64 M #s(literal 1 binary64)) (pow.f64 M #s(literal 1 binary64)))
(*.f64 (neg.f64 M) (neg.f64 M))
(*.f64 (fabs.f64 M) (fabs.f64 M))
(*.f64 M M)
(pow.f64 M #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 M) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 M) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 M) #s(literal 2 binary64))))
M
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) c0))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) c0) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) c0) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) c0) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (/ c0 (* 2 w)) (*.f64 (/.f64 c0 w) #s(literal 1/2 binary64)))
#s(approx c0 c0)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (* d d)) (* (* w h) (* D D))) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))
#s(approx (* c0 (* d d)) (*.f64 (*.f64 d d) c0))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 c0 c0)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))) (pow.f64 D #s(literal 8 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (pow.f64 w #s(literal 6 binary64))) (pow.f64 h #s(literal 6 binary64))) (pow.f64 M #s(literal 5 binary64))))))) (*.f64 c0 c0)) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 d #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 c0 c0)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (neg.f64 (*.f64 M M)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (-.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64)))) (*.f64 M M)))
#s(approx (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/4 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/32 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.f64 c0 c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64))) c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (+.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64))) c0))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64))) c0))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64))) c0))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64)))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (*.f64 (+.f64 (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (pow.f64 D #s(literal 4 binary64)))) (/.f64 (neg.f64 (*.f64 M M)) (*.f64 c0 c0))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 c0 c0)) w) #s(literal -1/2 binary64)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) w) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) w) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal 1/16 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) w) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal 1/16 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/4 binary64)))) (*.f64 c0 c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)))) c0)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64))) c0)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64))) c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* 2 w) (*.f64 w #s(literal 2 binary64)))
#s(approx w w)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 D D) h))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 D D) h))) w))
#s(approx (* (* w h) (* D D)) (*.f64 (*.f64 (*.f64 h w) D) D))
#s(approx (* w h) (*.f64 h w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w)) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h))) w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w)) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h))) w))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 h h))) (neg.f64 (pow.f64 (*.f64 M w) #s(literal 2 binary64)))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 h w)))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 h w))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))) (pow.f64 D #s(literal 8 binary64))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 h w)))))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 4 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))) (pow.f64 D #s(literal 8 binary64))))) #s(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 4 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))) (pow.f64 D #s(literal 8 binary64))))) #s(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 6 binary64)) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (pow.f64 w #s(literal 6 binary64))) (pow.f64 h #s(literal 6 binary64))) (pow.f64 M #s(literal 5 binary64))))) #s(literal 1/16 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (*.f64 (*.f64 (pow.f64 c0 #s(literal 4 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))) (pow.f64 D #s(literal 8 binary64))))) #s(literal -1/8 binary64))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 h w)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)))) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) #s(literal 1/2 binary64))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal -1/4 binary64)) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 w w)) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))))) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) #s(literal 1/2 binary64))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)))) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)))) w)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 w w)) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))))) w))) w)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (*.f64 (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 D D) w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 D D) w))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 w #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 D D) w))) h))
#s(approx h h)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h)) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 w #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h)) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w))) h))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 w w))) (neg.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)))) (*.f64 h h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (pow.f64 w #s(literal 3 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (*.f64 h h)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64))))))) h))) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 h w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (pow.f64 D #s(literal 4 binary64))) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 h w))) (*.f64 D D)))
#s(approx (* D D) (*.f64 D D))
#s(approx D D)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (pow.f64 D #s(literal 4 binary64))) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w))) (*.f64 D D)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w))) (*.f64 D D)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 4 binary64))) (pow.f64 (*.f64 h w) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 M M) (pow.f64 D #s(literal 4 binary64))))) (pow.f64 D #s(literal 4 binary64))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) (*.f64 d d)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)) (*.f64 (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 D #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) M)) #s(literal 1/2 binary64))) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 d d)) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w))) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* d d) (*.f64 d d))
#s(approx d d)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (-.f64 (*.f64 (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (pow.f64 d #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 c0 #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))) (pow.f64 D #s(literal 8 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 6 binary64)) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (pow.f64 w #s(literal 6 binary64))) (pow.f64 h #s(literal 6 binary64))) (pow.f64 M #s(literal 5 binary64))))))) (pow.f64 d #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 d #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/4 binary64)) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/4 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/16 binary64))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/4 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/16 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/32 binary64)) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64))) (*.f64 d d)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64))) (*.f64 d d)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w))))) (*.f64 d d)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w))) (*.f64 d d)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64))) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w))) (*.f64 d d)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/16 binary64)) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)))) (*.f64 d d)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (*.f64 (+.f64 (/.f64 (*.f64 c0 c0) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (pow.f64 D #s(literal 4 binary64)))) (/.f64 (neg.f64 (*.f64 M M)) (pow.f64 d #s(literal 4 binary64)))) (pow.f64 d #s(literal 4 binary64))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)) #s(literal -1/4 binary64)) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 M M)) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M)) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h w) D) D) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h w) D) D) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h w) D) D) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h w) D) D) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (+.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64)))) (neg.f64 (*.f64 M M))))
#s(approx (* M M) (*.f64 M M))
#s(approx M M)
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 (*.f64 w w) h) M)))) M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 (*.f64 w w) h) M))))) M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 (*.f64 w w) h) M)))))) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))) M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64))) M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 6 binary64)) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (pow.f64 w #s(literal 6 binary64))) (pow.f64 h #s(literal 6 binary64)))))) #s(literal 1/16 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))) M))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 w w)))) #s(literal 1 binary64)) (*.f64 M M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 (-.f64 (*.f64 (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 (*.f64 w w) h) M)) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal -1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) M)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64))) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 6 binary64)) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (pow.f64 w #s(literal 6 binary64))) (pow.f64 h #s(literal 6 binary64)))))) #s(literal 1/16 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))) M)))

eval39.0ms (0.4%)

Memory
25.1MiB live, 69.0MiB allocated; 8ms collecting garbage
Compiler

Compiled 25 520 to 2 016 computations (92.1% saved)

prune82.0ms (0.9%)

Memory
-8.6MiB live, 53.7MiB allocated; 31ms collecting garbage
Pruning

19 alts after pruning (19 fresh and 0 done)

PrunedKeptTotal
New32719346
Fresh000
Picked101
Done000
Total32819347
Accuracy
46.5%
Counts
347 → 19
Alt Table
Click to see full alt table
StatusAccuracyProgram
23.6%
(/.f64 (*.f64 c0 (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))))) (*.f64 w #s(literal 2 binary64)))
21.3%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 h w)) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
29.6%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))))
3.4%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))))
20.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
20.2%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 D D) w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) h)))
33.1%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
24.3%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) c0)))
0.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
3.5%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))))
5.5%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))))
31.3%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
27.6%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) h))
18.8%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
22.1%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)))
4.6%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 c0 c0)) w) #s(literal -1/2 binary64)))
5.7%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) w) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.f64 c0 c0)))
20.1%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/4 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
17.7%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/4 binary64)) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
Compiler

Compiled 2 794 to 1 292 computations (53.8% saved)

series237.0ms (2.5%)

Memory
-3.7MiB live, 371.1MiB allocated; 37ms collecting garbage
Counts
56 → 368
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0))
(*.f64 (*.f64 d d) c0)
(*.f64 d d)
d
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) D)
(*.f64 h w)
h
D
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) M)
(sqrt.f64 #s(literal -1 binary64))
#s(literal -1 binary64)
M
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))
(*.f64 c0 (*.f64 d d))
(*.f64 (*.f64 w h) (*.f64 D D))
(*.f64 w h)
(*.f64 D D)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))
(neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))
(/.f64 (*.f64 c0 (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))))) (*.f64 w #s(literal 2 binary64)))
(*.f64 c0 (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)))))
(+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))))
(sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)))
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))
(pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))
(*.f64 M M)
(*.f64 w #s(literal 2 binary64))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
(/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D))
(+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64)))
(/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h))
(pow.f64 (*.f64 c0 d) #s(literal 2 binary64))
(*.f64 c0 d)
(*.f64 (*.f64 w w) h)
(*.f64 w w)
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d))
(*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64)))
(*.f64 (*.f64 M M) h)
(pow.f64 D #s(literal 4 binary64))
#s(literal 4 binary64)
#s(literal -1/4 binary64)
Outputs
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* (* d d) c0)) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* d d) c0) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (/ (* c0 (* d d)) (* (* w h) (* D D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* c0 (* d d)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (neg (/ (* (* d d) c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (* (* d d) c0) (* (* (* h w) D) D)) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (* c0 (sqrt -1)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (* -1 (pow M 2))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))) (pow M 2))))
#s(approx (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2)))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2))))))
#s(approx (/ (pow (* c0 d) 2) (* (* w w) h)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))))
#s(approx (pow (* c0 d) 2) #s(hole binary64 (* (pow c0 2) (pow d 2))))
#s(approx (* c0 d) #s(hole binary64 (* c0 d)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (* (pow c0 2) (+ (* -1 (/ (pow M 2) (pow c0 2))) (/ (pow d 4) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (* (* w h) (* D D)) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* w h) #s(hole binary64 (* h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6))))))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10))))))))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow w 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow h 2)))) (pow w 2))))
#s(approx (* w 2) #s(hole binary64 (* 2 w)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) h)) (pow w 2))))
#s(approx (* (* w w) h) #s(hole binary64 (* h (pow w 2))))
#s(approx (* w w) #s(hole binary64 (pow w 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow h 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow w 2)))) (pow h 2))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (pow w 2))) h)))
#s(approx (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4) #s(hole binary64 (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (* (* (* M M) h) (pow D 4)) (* d d)) #s(hole binary64 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))))
#s(approx (* (* (* M M) h) (pow D 4)) #s(hole binary64 (* (pow D 4) (* (pow M 2) h))))
#s(approx (* (* M M) h) #s(hole binary64 (* (pow M 2) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow h 2) (pow w 2))))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow D 4) (pow M 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow h 2) (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow h 2) (pow w 2))))) (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow h 2) (pow w 2)))) (* 1/4 (/ (* (pow D 4) (pow M 2)) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow D 4) (pow M 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow h 2) (pow w 2)))) (pow D 4))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (pow D 4) #s(hole binary64 (pow D 4)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow D 2) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* h (pow w 2))))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx d #s(hole binary64 d))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 2) (* (pow M 2) h))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 2) (* h (pow w 2))))) (pow d 2))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 4) (* (pow M 2) h))) (/ (* (pow c0 2) (pow d 4)) (* h (pow w 2)))) (pow d 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 12)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (* (pow d 4) (+ (* -1 (/ (pow M 2) (pow d 4))) (/ (pow c0 2) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (* (sqrt -1) M) #s(hole binary64 (* M (sqrt -1))))
#s(approx M #s(hole binary64 M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10)))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (+ (* -1 (pow M 2)) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))))))
#s(approx (* M M) #s(hole binary64 (pow M 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (* (pow M 2) (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (pow w 2))))) 1))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow M 2) (* h (pow w 2)))))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 4) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow M 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
Calls

18 calls:

TimeVariablePointExpression
40.0ms
c0
@inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* (* w h) (* D D)) (* w h) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg (/ (* (* d d) c0) (* (* (* h w) D) D))) (/ (* (* d d) c0) (* (* (* h w) D) D)) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M) (* w 2) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (/ (pow (* c0 d) 2) (* (* w w) h)) (pow (* c0 d) 2) (* c0 d) (* (* w w) h) (* w w) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4) (/ (* (* (* M M) h) (pow D 4)) (* d d)) (* (* (* M M) h) (pow D 4)) (* (* M M) h) (pow D 4) 4 -1/4)
23.0ms
M
@inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* (* w h) (* D D)) (* w h) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg (/ (* (* d d) c0) (* (* (* h w) D) D))) (/ (* (* d d) c0) (* (* (* h w) D) D)) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M) (* w 2) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (/ (pow (* c0 d) 2) (* (* w w) h)) (pow (* c0 d) 2) (* c0 d) (* (* w w) h) (* w w) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4) (/ (* (* (* M M) h) (pow D 4)) (* d d)) (* (* (* M M) h) (pow D 4)) (* (* M M) h) (pow D 4) 4 -1/4)
15.0ms
w
@-inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* (* w h) (* D D)) (* w h) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg (/ (* (* d d) c0) (* (* (* h w) D) D))) (/ (* (* d d) c0) (* (* (* h w) D) D)) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M) (* w 2) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (/ (pow (* c0 d) 2) (* (* w w) h)) (pow (* c0 d) 2) (* c0 d) (* (* w w) h) (* w w) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4) (/ (* (* (* M M) h) (pow D 4)) (* d d)) (* (* (* M M) h) (pow D 4)) (* (* M M) h) (pow D 4) 4 -1/4)
12.0ms
h
@inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* (* w h) (* D D)) (* w h) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg (/ (* (* d d) c0) (* (* (* h w) D) D))) (/ (* (* d d) c0) (* (* (* h w) D) D)) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M) (* w 2) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (/ (pow (* c0 d) 2) (* (* w w) h)) (pow (* c0 d) 2) (* c0 d) (* (* w w) h) (* w w) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4) (/ (* (* (* M M) h) (pow D 4)) (* d d)) (* (* (* M M) h) (pow D 4)) (* (* M M) h) (pow D 4) 4 -1/4)
12.0ms
D
@0
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* (* w h) (* D D)) (* w h) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg (/ (* (* d d) c0) (* (* (* h w) D) D))) (/ (* (* d d) c0) (* (* (* h w) D) D)) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M) (* w 2) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (/ (pow (* c0 d) 2) (* (* w w) h)) (pow (* c0 d) 2) (* c0 d) (* (* w w) h) (* w w) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4) (/ (* (* (* M M) h) (pow D 4)) (* d d)) (* (* (* M M) h) (pow D 4)) (* (* M M) h) (pow D 4) 4 -1/4)

rewrite262.0ms (2.7%)

Memory
11.2MiB live, 390.7MiB allocated; 57ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0160531881
0167928964
0832928964
Stop Event
iter limit
node limit
iter limit
Counts
424 → 517
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0))
(*.f64 (*.f64 d d) c0)
(*.f64 d d)
d
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) D)
(*.f64 h w)
h
D
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) M)
(sqrt.f64 #s(literal -1 binary64))
#s(literal -1 binary64)
M
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))
(*.f64 c0 (*.f64 d d))
(*.f64 (*.f64 w h) (*.f64 D D))
(*.f64 w h)
(*.f64 D D)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))
(neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))
(/.f64 (*.f64 c0 (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))))) (*.f64 w #s(literal 2 binary64)))
(*.f64 c0 (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)))))
(+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))))
(sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M)))
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))
(pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))
(*.f64 M M)
(*.f64 w #s(literal 2 binary64))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
(/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D))
(+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64)))
(/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h))
(pow.f64 (*.f64 c0 d) #s(literal 2 binary64))
(*.f64 c0 d)
(*.f64 (*.f64 w w) h)
(*.f64 w w)
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d))
(*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64)))
(*.f64 (*.f64 M M) h)
(pow.f64 D #s(literal 4 binary64))
#s(literal 4 binary64)
#s(literal -1/4 binary64)
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* (* d d) c0)) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* d d) c0) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (/ (* c0 (* d d)) (* (* w h) (* D D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* c0 (* d d)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (neg (/ (* (* d d) c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (* (* d d) c0) (* (* (* h w) D) D)) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (* c0 (sqrt -1)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (* -1 (pow M 2))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))) (pow M 2))))
#s(approx (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2)))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2))))))
#s(approx (/ (pow (* c0 d) 2) (* (* w w) h)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))))
#s(approx (pow (* c0 d) 2) #s(hole binary64 (* (pow c0 2) (pow d 2))))
#s(approx (* c0 d) #s(hole binary64 (* c0 d)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (* (pow c0 2) (+ (* -1 (/ (pow M 2) (pow c0 2))) (/ (pow d 4) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (* (* w h) (* D D)) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* w h) #s(hole binary64 (* h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6))))))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10))))))))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow w 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow h 2)))) (pow w 2))))
#s(approx (* w 2) #s(hole binary64 (* 2 w)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) h)) (pow w 2))))
#s(approx (* (* w w) h) #s(hole binary64 (* h (pow w 2))))
#s(approx (* w w) #s(hole binary64 (pow w 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow h 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow w 2)))) (pow h 2))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (pow w 2))) h)))
#s(approx (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4) #s(hole binary64 (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (* (* (* M M) h) (pow D 4)) (* d d)) #s(hole binary64 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))))
#s(approx (* (* (* M M) h) (pow D 4)) #s(hole binary64 (* (pow D 4) (* (pow M 2) h))))
#s(approx (* (* M M) h) #s(hole binary64 (* (pow M 2) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow h 2) (pow w 2))))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow D 4) (pow M 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow h 2) (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow h 2) (pow w 2))))) (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow h 2) (pow w 2)))) (* 1/4 (/ (* (pow D 4) (pow M 2)) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow D 4) (pow M 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow h 2) (pow w 2)))) (pow D 4))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (pow D 4) #s(hole binary64 (pow D 4)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow D 2) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* h (pow w 2))))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx d #s(hole binary64 d))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 2) (* (pow M 2) h))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 2) (* h (pow w 2))))) (pow d 2))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 4) (* (pow M 2) h))) (/ (* (pow c0 2) (pow d 4)) (* h (pow w 2)))) (pow d 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 12)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (* (pow d 4) (+ (* -1 (/ (pow M 2) (pow d 4))) (/ (pow c0 2) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (* (sqrt -1) M) #s(hole binary64 (* M (sqrt -1))))
#s(approx M #s(hole binary64 M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10)))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (+ (* -1 (pow M 2)) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))))))
#s(approx (* M M) #s(hole binary64 (pow M 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) #s(hole binary64 (* (pow M 2) (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (pow w 2))))) 1))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow M 2) (* h (pow w 2)))))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 4) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow M 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
Outputs
(*.f64 (/.f64 (/.f64 c0 #s(literal 2 binary64)) w) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 h w) D)) D)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 h w) D)) D))) (*.f64 #s(literal 2 binary64) w))
(/.f64 (/.f64 c0 #s(literal 2 binary64)) w)
(/.f64 (neg.f64 c0) (neg.f64 (*.f64 #s(literal 2 binary64) w)))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
(+.f64 w w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 h w) D)) D))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))
(*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 h w) D)) D)
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0)) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0)
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0))
(+.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 d d) c0))
(*.f64 (*.f64 d d) c0)
(*.f64 d (*.f64 d c0))
(*.f64 (pow.f64 d #s(literal 1 binary64)) (pow.f64 d #s(literal 1 binary64)))
(*.f64 (neg.f64 d) (neg.f64 d))
(*.f64 (fabs.f64 d) (fabs.f64 d))
(*.f64 d d)
(pow.f64 d #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 d) #s(literal 2 binary64)))
d
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) (*.f64 D D))
(*.f64 (*.f64 h w) D)
(*.f64 h (*.f64 w D))
(*.f64 h w)
h
D
(*.f64 (/.f64 (/.f64 c0 #s(literal 2 binary64)) w) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (*.f64 #s(literal 2 binary64) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) M)
(pow.f64 #s(literal -1 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal -1 binary64))
#s(literal -1 binary64)
M
(*.f64 (/.f64 (/.f64 c0 #s(literal 2 binary64)) w) (+.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 w h) D) D))))
(/.f64 (*.f64 c0 (+.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 w h) D) D)))) (*.f64 #s(literal 2 binary64) w))
(+.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 w h) D) D)) (/.f64 (/.f64 c0 #s(literal 2 binary64)) w)) (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))) (/.f64 (/.f64 c0 #s(literal 2 binary64)) w)))
(+.f64 (*.f64 (/.f64 (/.f64 c0 #s(literal 2 binary64)) w) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 w h) D) D))) (*.f64 (/.f64 (/.f64 c0 #s(literal 2 binary64)) w) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(literal 2 binary64)) (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))) (-.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D)))))))
(+.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 w h) D) D)))
(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)))
(*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D)))
(/.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 w h)) (*.f64 D D))
(/.f64 (neg.f64 (*.f64 c0 (*.f64 d d))) (neg.f64 (*.f64 (*.f64 (*.f64 w h) D) D)))
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 w h) D) D))
(*.f64 (*.f64 c0 d) d)
(*.f64 c0 (*.f64 d d))
(*.f64 (*.f64 (*.f64 w h) D) D)
(*.f64 (*.f64 w h) (*.f64 D D))
(*.f64 w (*.f64 h (*.f64 D D)))
(*.f64 w h)
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (neg.f64 D) (neg.f64 D))
(*.f64 (fabs.f64 D) (fabs.f64 D))
(*.f64 D D)
(pow.f64 D #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 D) #s(literal 2 binary64)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))
(/.f64 (*.f64 (*.f64 d d) c0) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(neg.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)))
(*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D))
(*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 h w) D)) D)
(/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (/.f64 c0 w) (/.f64 (+.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D))) #s(literal 2 binary64)))
(*.f64 c0 (/.f64 (+.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D))) (*.f64 w #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 c0 (+.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)))) w) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 c0 (+.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D))))) (neg.f64 (*.f64 w #s(literal 2 binary64))))
(/.f64 (*.f64 c0 (+.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)))) (*.f64 w #s(literal 2 binary64)))
(*.f64 c0 (+.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D))))
(+.f64 (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) c0) (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))) c0))
(+.f64 (*.f64 c0 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D))) (*.f64 c0 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))))) (-.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (-.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M)))))))
(+.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)))
(+.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))))
(pow.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M)))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64))) (pow.f64 M #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M)))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 M M) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64))) (+.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M)))))
(-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 M M))
(+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64)) (*.f64 (neg.f64 M) M))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 1 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)))
(pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D))) #s(literal 2 binary64)))
(*.f64 (pow.f64 M #s(literal 1 binary64)) (pow.f64 M #s(literal 1 binary64)))
(*.f64 (neg.f64 M) (neg.f64 M))
(*.f64 (fabs.f64 M) (fabs.f64 M))
(*.f64 M M)
(pow.f64 M #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 M) #s(literal 2 binary64)))
(*.f64 w #s(literal 2 binary64))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h))) D) D)
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)))) (neg.f64 (*.f64 D D)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h))) (*.f64 D D))
(+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64)) (*.f64 D D)))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64)))) (-.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64))) (*.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64))))))
(-.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d))) #s(literal -1/4 binary64)))
(+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)))
(+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64)))
(/.f64 (neg.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 w w) h)))
(/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 w w)) h)
(/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h))
(*.f64 (pow.f64 (*.f64 c0 d) #s(literal 1 binary64)) (pow.f64 (*.f64 c0 d) #s(literal 1 binary64)))
(*.f64 (*.f64 c0 d) (*.f64 c0 d))
(*.f64 (*.f64 c0 c0) (*.f64 d d))
(pow.f64 (*.f64 c0 d) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 c0 d)) #s(literal 2 binary64)))
(*.f64 c0 d)
(*.f64 (*.f64 w w) h)
(*.f64 w (*.f64 w h))
(*.f64 (pow.f64 w #s(literal 1 binary64)) (pow.f64 w #s(literal 1 binary64)))
(*.f64 (neg.f64 w) (neg.f64 w))
(*.f64 (fabs.f64 w) (fabs.f64 w))
(*.f64 w w)
(pow.f64 w #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 w) #s(literal 2 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) #s(literal -1/4 binary64)) (*.f64 d d))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d))
(*.f64 (*.f64 (*.f64 M M) h) (/.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 d d)))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) d) d)
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64)))) (neg.f64 (*.f64 d d)))
(/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d))
(*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64)))
(*.f64 (*.f64 M M) (*.f64 h (pow.f64 D #s(literal 4 binary64))))
(*.f64 (*.f64 M M) h)
(*.f64 M (*.f64 M h))
(*.f64 (*.f64 D D) (*.f64 D D))
(pow.f64 D #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 D) #s(literal 4 binary64)))
#s(literal 4 binary64)
#s(literal -1/4 binary64)
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (+.f64 (*.f64 c0 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c0 (pow.f64 d #s(literal 4 binary64)))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (+.f64 (*.f64 c0 (+.f64 (*.f64 c0 (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 5 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w)))))
#s(approx (/ c0 (* 2 w)) (*.f64 #s(literal 1/2 binary64) (/.f64 c0 w)))
#s(approx c0 c0)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 c0 (+.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 (pow.f64 d #s(literal 4 binary64)))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 c0 (+.f64 (*.f64 c0 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (* 2 (* (* d d) c0)) (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))))
#s(approx (* (* d d) c0) (*.f64 c0 (*.f64 d d)))
#s(approx (/ (* c0 (* d d)) (* (* w h) (* D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (* c0 (* d d)) (*.f64 c0 (*.f64 d d)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (*.f64 c0 c0) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (*.f64 c0 c0) (+.f64 (*.f64 (*.f64 c0 c0) (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 d #s(literal 8 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 (pow.f64 w #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 d #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (neg (/ (* (* d d) c0) (* (* (* h w) D) D))) (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (/ (* (* d d) c0) (* (* (* h w) D) D)) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 c0 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 c0 (+.f64 (*.f64 c0 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c0 (pow.f64 d #s(literal 4 binary64)))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 c0 (+.f64 (*.f64 c0 (+.f64 (*.f64 c0 (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 5 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 c0 (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 c0 (+.f64 (*.f64 c0 (+.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 (pow.f64 d #s(literal 4 binary64)))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 c0 (+.f64 (*.f64 c0 (+.f64 (*.f64 c0 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 c0 (+.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 (pow.f64 d #s(literal 4 binary64)))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 c0 (+.f64 (*.f64 c0 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (+.f64 (*.f64 (*.f64 c0 c0) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (+.f64 (*.f64 (*.f64 c0 c0) (+.f64 (*.f64 (*.f64 c0 c0) (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 d #s(literal 8 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 (pow.f64 w #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 d #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (neg.f64 (*.f64 M M)))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (-.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64)))) (*.f64 M M)))
#s(approx (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 w w)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (*.f64 M M) h)) (*.f64 d d)))))
#s(approx (/ (pow (* c0 d) 2) (* (* w w) h)) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 w w)))
#s(approx (pow (* c0 d) 2) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))
#s(approx (* c0 d) (*.f64 c0 d))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64)))) (pow.f64 d #s(literal 10 binary64))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 c0 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 c0 (+.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 c0 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (+.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (+.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64)))) (pow.f64 d #s(literal 10 binary64))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 c0 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 c0 (+.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 c0 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (*.f64 c0 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (*.f64 c0 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (*.f64 c0 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64)))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (*.f64 (*.f64 c0 c0) (+.f64 (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64)))) (/.f64 (neg.f64 (*.f64 M M)) (*.f64 c0 c0)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (*.f64 (*.f64 c0 c0) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 w w)))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (*.f64 (*.f64 c0 c0) (+.f64 (/.f64 (/.f64 (*.f64 d d) h) (*.f64 w w)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (*.f64 M M) h)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64)))) (pow.f64 d #s(literal 10 binary64)))))) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))))) (+.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (+.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64)))) (pow.f64 d #s(literal 10 binary64)))))) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (*.f64 c0 c0) (-.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))))) (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))))) (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))))) (+.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (neg.f64 (*.f64 c0 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (neg.f64 (*.f64 c0 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (neg.f64 (*.f64 c0 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h (*.f64 w w))) (*.f64 d d)))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d))))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 (*.f64 w w) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d))))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* 2 w) (*.f64 #s(literal 2 binary64) w))
#s(approx w w)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h (*.f64 w w))) (*.f64 c0 (*.f64 d d))))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 (*.f64 w w) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) w))
#s(approx (* (* (* h w) D) D) (*.f64 (*.f64 (*.f64 D D) h) w))
#s(approx (* (* h w) D) (*.f64 D (*.f64 h w)))
#s(approx (* h w) (*.f64 h w))
#s(approx (* (* w h) (* D D)) (*.f64 (*.f64 (*.f64 D D) h) w))
#s(approx (* w h) (*.f64 h w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h (*.f64 w w))) (*.f64 c0 (*.f64 d d))))) w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 c0 (*.f64 d d)))))) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h))) w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 (*.f64 w w) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 c0 (*.f64 d d)))))) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h))) w))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h (*.f64 w w))) (*.f64 d d)))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d))))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 (*.f64 w w) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d))))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 D D) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h (*.f64 w w))) (*.f64 d d)))) w))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 D D) h))) w))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 (*.f64 w w) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 D D) h))) w))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h (*.f64 w w))) (*.f64 c0 (*.f64 d d))))) w))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) w))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 (*.f64 w w) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) w))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (/.f64 (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h (*.f64 w w))) (*.f64 c0 (*.f64 d d))))) w))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 c0 (*.f64 d d)))))) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h))) w))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (/.f64 (+.f64 (*.f64 (*.f64 w w) (+.f64 (*.f64 (*.f64 w w) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 c0 (*.f64 d d)))))) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h))) w))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 h h))) (neg.f64 (pow.f64 (*.f64 M w) #s(literal 2 binary64)))) (*.f64 w w)))
#s(approx (* w 2) (*.f64 #s(literal 2 binary64) w))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h (*.f64 w w))) (*.f64 d d)))) (*.f64 w w)))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 d d)))) (*.f64 w w)))
#s(approx (* (* w w) h) (*.f64 h (*.f64 w w)))
#s(approx (* w w) (*.f64 w w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 c0 #s(literal 4 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 c0 #s(literal 4 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 6 binary64)) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 (pow.f64 w #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 c0 #s(literal 4 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))) w))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))))) w))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 c0 #s(literal 4 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 c0 #s(literal 4 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (+.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 6 binary64)) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 (pow.f64 w #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 c0 #s(literal 4 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (*.f64 w w) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)))) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (*.f64 w w) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))))) w))) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (*.f64 w w) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))) (neg.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (*.f64 w w) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))))) w))) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)))) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (*.f64 w w) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))))) w))) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (pow.f64 (*.f64 M h) #s(literal 2 binary64))) (*.f64 d d)))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d))))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 4 binary64)))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d))))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 3 binary64)))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 w #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64)))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w))) h))
#s(approx h h)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 3 binary64)))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 c0 (*.f64 d d)))))) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 w #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64)))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 c0 (*.f64 d d)))))) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w))) h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (pow.f64 (*.f64 M h) #s(literal 2 binary64))) (*.f64 d d)))) h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d))))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 4 binary64)))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d))))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 d d)))) h))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 3 binary64)))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 d d))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 D D) w))) h))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 w #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64)))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 d d))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 D D) w))) h))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 3 binary64)))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w))) h))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 w #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64)))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w))) h))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (/.f64 (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 3 binary64)))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 c0 (*.f64 d d)))))) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w))) h))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (/.f64 (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 w #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64)))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 c0 (*.f64 d d)))))) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w))) h))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 w w))) (neg.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)))) (*.f64 h h)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (pow.f64 (*.f64 M h) #s(literal 2 binary64))) (*.f64 d d)))) h))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 w w)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (*.f64 M h) #s(literal 2 binary64))) (*.f64 d d)))) h))
#s(approx (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
#s(approx (/ (* (* (* M M) h) (pow D 4)) (* d d)) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (*.f64 M M) h)) (*.f64 d d)))
#s(approx (* (* (* M M) h) (pow D 4)) (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (*.f64 M M) h)))
#s(approx (* (* M M) h) (*.f64 (*.f64 M M) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 5 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 5 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (*.f64 h (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) (pow.f64 (*.f64 h w) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (*.f64 h (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 M M)) (*.f64 d d))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (pow.f64 w #s(literal 3 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 h h) (pow.f64 w #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64))))))) h))) h)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (pow.f64 w #s(literal 3 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (neg.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w)))) h)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w)) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 h h) (pow.f64 w #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64))))))) h))) h)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 h h) (pow.f64 w #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64))))))) h))) h)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (neg.f64 (*.f64 h (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) (pow.f64 (*.f64 h w) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d)))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (neg.f64 (*.f64 h (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 M M)) (*.f64 d d)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 w w)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (*.f64 M M) h)) (*.f64 d d)))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))))) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64)))) (pow.f64 d #s(literal 10 binary64))))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d)))) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 h w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 M M)) (*.f64 h w)) (*.f64 c0 (*.f64 d d))))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 h w))) (*.f64 D D)))
#s(approx D D)
#s(approx (* D D) (*.f64 D D))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 M M)) (*.f64 h w)) (*.f64 c0 (*.f64 d d))))) (*.f64 D D)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))))) (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w))) (*.f64 D D)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))))) (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 w w)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (*.f64 M M) h)) (*.f64 d d)))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))))) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64)))) (pow.f64 d #s(literal 10 binary64))))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d)))) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 M M)) (*.f64 h w)) (*.f64 d d))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) w))) (*.f64 D D)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 d d)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) w))) (*.f64 D D)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 d d)))) (*.f64 #s(literal 2 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) w))) (*.f64 D D)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 h w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 M M)) (*.f64 h w)) (*.f64 c0 (*.f64 d d))))) (*.f64 D D)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 h w))) (*.f64 D D)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (/.f64 (+.f64 (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 M M)) (*.f64 h w)) (*.f64 c0 (*.f64 d d))))) (*.f64 D D)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))))) (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w))) (*.f64 D D)))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (/.f64 (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (+.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))))) (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w))) (*.f64 D D)))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 4 binary64))) (pow.f64 (*.f64 h w) #s(literal 2 binary64))) (neg.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 M M)))) (pow.f64 D #s(literal 4 binary64))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (/.f64 (+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 w w)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (*.f64 M M) h)) (*.f64 d d)))) (*.f64 D D)))
#s(approx (pow D 4) (pow.f64 D #s(literal 4 binary64)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (*.f64 (*.f64 D D) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d)))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (*.f64 (pow.f64 D #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (*.f64 d d) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (*.f64 d d) (+.f64 (*.f64 (*.f64 d d) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 5 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (*.f64 d d) (+.f64 (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (*.f64 d d) (+.f64 (*.f64 (*.f64 d d) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 c0 d) #s(literal 4 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* d d) (*.f64 d d))
#s(approx d d)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (pow.f64 d #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 c0 d) #s(literal 4 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (pow.f64 d #s(literal 4 binary64)) (+.f64 (*.f64 (pow.f64 d #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 c0 #s(literal 4 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 6 binary64)) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 (pow.f64 w #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (*.f64 d d) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (*.f64 d d) (+.f64 (*.f64 (*.f64 d d) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 5 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (*.f64 d d) (+.f64 (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (*.f64 d d) (+.f64 (*.f64 (*.f64 d d) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (*.f64 d d) (+.f64 (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (*.f64 d d) (+.f64 (*.f64 (*.f64 d d) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 c0 d) #s(literal 4 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (+.f64 (*.f64 (pow.f64 d #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 c0 d) #s(literal 4 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (+.f64 (*.f64 (pow.f64 d #s(literal 4 binary64)) (+.f64 (*.f64 (pow.f64 d #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 c0 #s(literal 4 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 3 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 6 binary64)) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 (pow.f64 w #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 c0 c0) (*.f64 D D)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 h (*.f64 w w)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h))) (*.f64 d d)))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 4 binary64))) (*.f64 h (*.f64 w w))) (*.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 D #s(literal 4 binary64))) (*.f64 (*.f64 M M) h))) (*.f64 d d)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64)))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (+.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 8 binary64)))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (+.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 8 binary64)))))) (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64)))) (pow.f64 d #s(literal 12 binary64))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (pow.f64 d #s(literal 4 binary64))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (+.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 8 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (pow.f64 d #s(literal 4 binary64))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (pow.f64 d #s(literal 4 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 8 binary64)))))) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 12 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (*.f64 d d) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (pow.f64 d #s(literal 4 binary64))))) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (*.f64 d d) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (pow.f64 d #s(literal 4 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 8 binary64)))))) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (*.f64 d d) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (pow.f64 d #s(literal 4 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 8 binary64)))))) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 12 binary64))))) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 d d) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64)))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 d d) (+.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 8 binary64)))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 d d) (+.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 8 binary64)))))) (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64)))) (pow.f64 d #s(literal 12 binary64))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (*.f64 d d) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 d #s(literal 4 binary64)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (*.f64 d d) (+.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 8 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 d #s(literal 4 binary64)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (*.f64 d d) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 d #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 8 binary64)))))) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 12 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (*.f64 d d) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (pow.f64 d #s(literal 4 binary64))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (*.f64 d d) (+.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 8 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (pow.f64 d #s(literal 4 binary64))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (*.f64 d d) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (pow.f64 d #s(literal 4 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 8 binary64)))))) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 12 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (*.f64 (*.f64 d d) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (pow.f64 d #s(literal 4 binary64))))) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (*.f64 (*.f64 d d) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (pow.f64 d #s(literal 4 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 8 binary64)))))) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (*.f64 (*.f64 d d) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (pow.f64 d #s(literal 4 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 8 binary64)))))) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 12 binary64))))) (/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 h w))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 c0 c0) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64)))) (/.f64 (neg.f64 (*.f64 M M)) (pow.f64 d #s(literal 4 binary64))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (*.f64 (*.f64 d d) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64)))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (*.f64 (*.f64 d d) (+.f64 (/.f64 (/.f64 (*.f64 c0 c0) h) (*.f64 w w)) (/.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 D #s(literal 4 binary64))) (*.f64 (*.f64 M M) h)) (pow.f64 d #s(literal 4 binary64))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (*.f64 M M) (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64)))) (pow.f64 d #s(literal 10 binary64))))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d)))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (*.f64 M M) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (* (sqrt -1) M) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx M M)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (*.f64 M M) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (+.f64 (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (*.f64 M M) (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w))) (pow.f64 d #s(literal 6 binary64))))))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64)))) (pow.f64 d #s(literal 10 binary64))))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d)))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (*.f64 M M) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 d d))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 d d))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (*.f64 M M) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (+.f64 (*.f64 (*.f64 M M) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (+.f64 (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (+.f64 (neg.f64 (*.f64 M M)) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64))))))
#s(approx (* M M) (*.f64 M M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 5 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))) (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (+.f64 (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 M (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 M (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 M (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 6 binary64)) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 (pow.f64 w #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 M (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 M (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 M (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 5 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 M (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))) (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 M (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))) (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 M (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))) (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 M (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))) (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 M (+.f64 (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 M (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (*.f64 M (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (*.f64 M (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (*.f64 M (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 6 binary64)) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 (pow.f64 w #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)) (*.f64 (*.f64 M M) (-.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 w w)))) #s(literal 1 binary64))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (*.f64 (*.f64 M M) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h (*.f64 w w)))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d)))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (*.f64 (*.f64 M M) (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) h)) (*.f64 d d)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 5 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))) M)) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) M)) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))) M)) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 M (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 M (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 M (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 6 binary64)) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 (pow.f64 w #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (*.f64 M (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 5 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 h h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) w))) M)) (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) M)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) w))) M)) (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))) M)) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) M)) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))) M)) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (neg.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (neg.f64 (*.f64 M (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (neg.f64 (*.f64 M (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))) (neg.f64 (*.f64 M (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 6 binary64)) (pow.f64 D #s(literal 12 binary64))) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 (pow.f64 w #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))))))

eval73.0ms (0.8%)

Memory
23.5MiB live, 159.4MiB allocated; 15ms collecting garbage
Compiler

Compiled 59 878 to 3 291 computations (94.5% saved)

prune81.0ms (0.8%)

Memory
3.1MiB live, 99.2MiB allocated; 19ms collecting garbage
Pruning

26 alts after pruning (26 fresh and 0 done)

PrunedKeptTotal
New71423737
Fresh11314
Picked505
Done000
Total73026756
Accuracy
71.9%
Counts
756 → 26
Alt Table
Click to see full alt table
StatusAccuracyProgram
20.2%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h))) (*.f64 w #s(literal 2 binary64)))
29.4%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 w #s(literal 2 binary64)))
4.1%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) (*.f64 w #s(literal 2 binary64)))
35.0%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 h w) D)) D))) (*.f64 #s(literal 2 binary64) w))
35.2%
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 w #s(literal 2 binary64)))
3.4%
(*.f64 (/.f64 c0 (+.f64 w w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))))
33.1%
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
0.0%
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
4.3%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))))
20.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
33.3%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D))))
36.7%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
34.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)))))
31.7%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
27.6%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (pow.f64 (*.f64 M h) #s(literal 2 binary64))) (*.f64 d d)))) h))
17.7%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 d d) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64)))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
4.1%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))))))
2.7%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) w)))
31.3%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
23.6%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h))) D) D))
32.5%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
20.0%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (*.f64 h (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 M M)) (*.f64 d d)))))) (*.f64 D D)))
15.0%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (*.f64 M M) h)) (*.f64 d d)))) (*.f64 D D)))
4.6%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 c0 c0)) w) #s(literal -1/2 binary64)))
26.5%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (*.f64 h (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) (pow.f64 (*.f64 h w) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d)))))))
32.4%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)))))
Compiler

Compiled 3 824 to 1 852 computations (51.6% saved)

series228.0ms (2.4%)

Memory
-16.1MiB live, 168.2MiB allocated; 21ms collecting garbage
Counts
61 → 343
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0)))
(*.f64 d (*.f64 d c0))
d
(*.f64 d c0)
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) D)
(*.f64 h w)
h
D
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
(/.f64 c0 (+.f64 w w))
(+.f64 w w)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) M)
(sqrt.f64 #s(literal -1 binary64))
#s(literal -1 binary64)
M
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) (*.f64 w #s(literal 2 binary64)))
(*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
(neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
(*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))
(*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(literal 0 binary64)
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))
(*.f64 d d)
(*.f64 (*.f64 (*.f64 D D) h) w)
(*.f64 (*.f64 D D) h)
(*.f64 D D)
(*.f64 w #s(literal 2 binary64))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))
(pow.f64 (*.f64 c0 d) #s(literal 2 binary64))
(*.f64 c0 d)
(*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))
(*.f64 w w)
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h))) (*.f64 w #s(literal 2 binary64)))
(*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h))
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h)
(+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w))
(*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d)))
(*.f64 c0 (*.f64 d d))
(*.f64 (*.f64 D D) w)
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))
#s(literal -1/2 binary64)
(/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d)))
(*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w))
(pow.f64 (*.f64 D M) #s(literal 2 binary64))
(*.f64 D M)
(*.f64 (*.f64 h h) w)
(*.f64 h h)
Outputs
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* d (* d c0))) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* d (* d c0)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* d c0) #s(hole binary64 (* c0 d)))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (+ w w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (* c0 (sqrt -1)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(hole binary64 0))
#s(approx (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w)))) #s(hole binary64 0))
#s(approx (/ (pow (* c0 d) 2) (* (* (* D D) h) (* w w))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (pow (* c0 d) 2) #s(hole binary64 (* (pow c0 2) (pow d 2))))
#s(approx (* c0 d) #s(hole binary64 (* c0 d)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) c0)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) c0)))
#s(approx (/ (* 2 (* c0 (* d d))) (* (* D D) w)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))))
#s(approx (* 2 (* c0 (* d d))) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* c0 (* d d)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d)))) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2))))))
#s(approx (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* -1 (* c0 (+ (* -2 (/ (pow d 2) (* (pow D 2) (* h w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* -1 (* c0 (+ (* -2 (/ (pow d 2) (* (pow D 2) w))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (+ w w) #s(hole binary64 (* 2 w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6))))))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10))))))))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* 0 (/ (* d d) (* (* (* D D) h) w))) #s(hole binary64 0))
#s(approx (/ (* d d) (* (* (* D D) h) w)) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (* (* (* D D) h) w) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* w 2) #s(hole binary64 (* 2 w)))
#s(approx (* (* (* D D) h) (* w w)) #s(hole binary64 (* (pow D 2) (* h (pow w 2)))))
#s(approx (* w w) #s(hole binary64 (pow w 2)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (pow D 2)))) w)))
#s(approx (* (* D D) w) #s(hole binary64 (* (pow D 2) w)))
#s(approx (* (pow (* D M) 2) (* (* h h) w)) #s(hole binary64 (* (pow D 2) (* (pow M 2) (* (pow h 2) w)))))
#s(approx (* (* h h) w) #s(hole binary64 (* (pow h 2) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* -1 (* w (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* -1 (* w (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (pow w 2)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (* c0 (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (* (* D D) h) #s(hole binary64 (* (pow D 2) h)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))))))
#s(approx (* h h) #s(hole binary64 (pow h 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) w))) (pow D 2))))
#s(approx (pow (* D M) 2) #s(hole binary64 (* (pow D 2) (pow M 2))))
#s(approx (* D M) #s(hole binary64 (* D M)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 4) (* h w))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* (pow h 2) w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 4) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx d #s(hole binary64 d))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) c0)) (* 2 (/ (* c0 (pow d 4)) (* (pow D 2) (* h w))))) (pow d 2))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) c0)) (* 2 (/ (* c0 (pow d 4)) (* (pow D 2) w)))) (pow d 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 12)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (sqrt -1) M) #s(hole binary64 (* M (sqrt -1))))
#s(approx M #s(hole binary64 M))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10)))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow h 2) w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow M 2) w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
Calls

18 calls:

TimeVariablePointExpression
29.0ms
D
@inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (+ w w)) (+ w w) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w)))) (* 0 (/ (* d d) (* (* (* D D) h) w))) 0 (/ (* d d) (* (* (* D D) h) w)) (* d d) (* (* (* D D) h) w) (* (* D D) h) (* D D) (* w 2) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/ (pow (* c0 d) 2) (* (* (* D D) h) (* w w))) (pow (* c0 d) 2) (* c0 d) (* (* (* D D) h) (* w w)) (* w w) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* 2 (* c0 (* d d))) (* c0 (* d d)) (* (* D D) w) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d)))) -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))) (* (pow (* D M) 2) (* (* h h) w)) (pow (* D M) 2) (* D M) (* (* h h) w) (* h h))
23.0ms
w
@inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (+ w w)) (+ w w) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w)))) (* 0 (/ (* d d) (* (* (* D D) h) w))) 0 (/ (* d d) (* (* (* D D) h) w)) (* d d) (* (* (* D D) h) w) (* (* D D) h) (* D D) (* w 2) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/ (pow (* c0 d) 2) (* (* (* D D) h) (* w w))) (pow (* c0 d) 2) (* c0 d) (* (* (* D D) h) (* w w)) (* w w) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* 2 (* c0 (* d d))) (* c0 (* d d)) (* (* D D) w) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d)))) -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))) (* (pow (* D M) 2) (* (* h h) w)) (pow (* D M) 2) (* D M) (* (* h h) w) (* h h))
19.0ms
c0
@0
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (+ w w)) (+ w w) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w)))) (* 0 (/ (* d d) (* (* (* D D) h) w))) 0 (/ (* d d) (* (* (* D D) h) w)) (* d d) (* (* (* D D) h) w) (* (* D D) h) (* D D) (* w 2) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/ (pow (* c0 d) 2) (* (* (* D D) h) (* w w))) (pow (* c0 d) 2) (* c0 d) (* (* (* D D) h) (* w w)) (* w w) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* 2 (* c0 (* d d))) (* c0 (* d d)) (* (* D D) w) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d)))) -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))) (* (pow (* D M) 2) (* (* h h) w)) (pow (* D M) 2) (* D M) (* (* h h) w) (* h h))
11.0ms
w
@-inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (+ w w)) (+ w w) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w)))) (* 0 (/ (* d d) (* (* (* D D) h) w))) 0 (/ (* d d) (* (* (* D D) h) w)) (* d d) (* (* (* D D) h) w) (* (* D D) h) (* D D) (* w 2) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/ (pow (* c0 d) 2) (* (* (* D D) h) (* w w))) (pow (* c0 d) 2) (* c0 d) (* (* (* D D) h) (* w w)) (* w w) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* 2 (* c0 (* d d))) (* c0 (* d d)) (* (* D D) w) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d)))) -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))) (* (pow (* D M) 2) (* (* h h) w)) (pow (* D M) 2) (* D M) (* (* h h) w) (* h h))
9.0ms
h
@-inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (+ w w)) (+ w w) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w)))) (* 0 (/ (* d d) (* (* (* D D) h) w))) 0 (/ (* d d) (* (* (* D D) h) w)) (* d d) (* (* (* D D) h) w) (* (* D D) h) (* D D) (* w 2) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/ (pow (* c0 d) 2) (* (* (* D D) h) (* w w))) (pow (* c0 d) 2) (* c0 d) (* (* (* D D) h) (* w w)) (* w w) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* 2 (* c0 (* d d))) (* c0 (* d d)) (* (* D D) w) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d)))) -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))) (* (pow (* D M) 2) (* (* h h) w)) (pow (* D M) 2) (* D M) (* (* h h) w) (* h h))

rewrite287.0ms (3%)

Memory
11.3MiB live, 367.3MiB allocated; 105ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0151231141
0159027860
0847927860
Stop Event
iter limit
node limit
iter limit
Counts
404 → 569
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0)))
(*.f64 d (*.f64 d c0))
d
(*.f64 d c0)
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) D)
(*.f64 h w)
h
D
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
(/.f64 c0 (+.f64 w w))
(+.f64 w w)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) M)
(sqrt.f64 #s(literal -1 binary64))
#s(literal -1 binary64)
M
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) (*.f64 w #s(literal 2 binary64)))
(*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
(neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
(*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))
(*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(literal 0 binary64)
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))
(*.f64 d d)
(*.f64 (*.f64 (*.f64 D D) h) w)
(*.f64 (*.f64 D D) h)
(*.f64 D D)
(*.f64 w #s(literal 2 binary64))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))
(pow.f64 (*.f64 c0 d) #s(literal 2 binary64))
(*.f64 c0 d)
(*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))
(*.f64 w w)
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h))) (*.f64 w #s(literal 2 binary64)))
(*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h))
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h)
(+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w))
(*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d)))
(*.f64 c0 (*.f64 d d))
(*.f64 (*.f64 D D) w)
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))
#s(literal -1/2 binary64)
(/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d)))
(*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w))
(pow.f64 (*.f64 D M) #s(literal 2 binary64))
(*.f64 D M)
(*.f64 (*.f64 h h) w)
(*.f64 h h)
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* d (* d c0))) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* d (* d c0)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* d c0) #s(hole binary64 (* c0 d)))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (+ w w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (* c0 (sqrt -1)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(hole binary64 0))
#s(approx (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w)))) #s(hole binary64 0))
#s(approx (/ (pow (* c0 d) 2) (* (* (* D D) h) (* w w))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (pow (* c0 d) 2) #s(hole binary64 (* (pow c0 2) (pow d 2))))
#s(approx (* c0 d) #s(hole binary64 (* c0 d)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) c0)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) c0)))
#s(approx (/ (* 2 (* c0 (* d d))) (* (* D D) w)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))))
#s(approx (* 2 (* c0 (* d d))) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* c0 (* d d)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d)))) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2))))))
#s(approx (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* -1 (* c0 (+ (* -2 (/ (pow d 2) (* (pow D 2) (* h w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* -1 (* c0 (+ (* -2 (/ (pow d 2) (* (pow D 2) w))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (+ w w) #s(hole binary64 (* 2 w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6))))))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10))))))))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* 0 (/ (* d d) (* (* (* D D) h) w))) #s(hole binary64 0))
#s(approx (/ (* d d) (* (* (* D D) h) w)) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (* (* (* D D) h) w) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* w 2) #s(hole binary64 (* 2 w)))
#s(approx (* (* (* D D) h) (* w w)) #s(hole binary64 (* (pow D 2) (* h (pow w 2)))))
#s(approx (* w w) #s(hole binary64 (pow w 2)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (pow D 2)))) w)))
#s(approx (* (* D D) w) #s(hole binary64 (* (pow D 2) w)))
#s(approx (* (pow (* D M) 2) (* (* h h) w)) #s(hole binary64 (* (pow D 2) (* (pow M 2) (* (pow h 2) w)))))
#s(approx (* (* h h) w) #s(hole binary64 (* (pow h 2) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* -1 (* w (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* -1 (* w (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (pow w 2)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (* c0 (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (* (* D D) h) #s(hole binary64 (* (pow D 2) h)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))))))
#s(approx (* h h) #s(hole binary64 (pow h 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) w))) (pow D 2))))
#s(approx (pow (* D M) 2) #s(hole binary64 (* (pow D 2) (pow M 2))))
#s(approx (* D M) #s(hole binary64 (* D M)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 4) (* h w))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* (pow h 2) w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 4) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx d #s(hole binary64 d))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) c0)) (* 2 (/ (* c0 (pow d 4)) (* (pow D 2) (* h w))))) (pow d 2))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) c0)) (* 2 (/ (* c0 (pow d 4)) (* (pow D 2) w)))) (pow d 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 12)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (sqrt -1) M) #s(hole binary64 (* M (sqrt -1))))
#s(approx M #s(hole binary64 M))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10)))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow h 2) w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow M 2) w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
Outputs
(*.f64 (/.f64 c0 (*.f64 w #s(literal 2 binary64))) #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))))
(*.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))) (/.f64 c0 (*.f64 w #s(literal 2 binary64))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D)))) (*.f64 w #s(literal 2 binary64)))
(/.f64 (/.f64 c0 #s(literal 2 binary64)) w)
(/.f64 (neg.f64 c0) (neg.f64 (*.f64 w #s(literal 2 binary64))))
(/.f64 c0 (*.f64 w #s(literal 2 binary64)))
c0
(*.f64 w #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) w)
(/.f64 (-.f64 (*.f64 w w) (*.f64 w w)) (-.f64 w w))
(/.f64 (+.f64 (pow.f64 w #s(literal 3 binary64)) (pow.f64 w #s(literal 3 binary64))) (+.f64 (*.f64 w w) (-.f64 (*.f64 w w) (*.f64 w w))))
(+.f64 w w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D)))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))
(*.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D)) D)
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D))
(+.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 d c0))
(*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d))
(*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0))
(+.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 d d) c0))
(*.f64 (*.f64 d c0) d)
(*.f64 (*.f64 d d) c0)
(*.f64 d (*.f64 d c0))
(*.f64 c0 (*.f64 d d))
d
(*.f64 d c0)
(*.f64 c0 d)
(*.f64 (*.f64 (*.f64 D D) h) w)
(*.f64 (*.f64 D D) (*.f64 h w))
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) (*.f64 D D))
(*.f64 D (*.f64 (*.f64 h w) D))
(*.f64 w (*.f64 (*.f64 D D) h))
(*.f64 (*.f64 D h) w)
(*.f64 (*.f64 h w) D)
(*.f64 D (*.f64 h w))
(*.f64 h (*.f64 w D))
(*.f64 h w)
(*.f64 w h)
h
D
(*.f64 (/.f64 c0 (*.f64 w #s(literal 2 binary64))) #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
(*.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)) (/.f64 c0 (*.f64 w #s(literal 2 binary64))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (*.f64 w #s(literal 2 binary64)))
(/.f64 (/.f64 c0 #s(literal 2 binary64)) w)
(/.f64 (neg.f64 c0) (neg.f64 (*.f64 w #s(literal 2 binary64))))
(/.f64 c0 (*.f64 w #s(literal 2 binary64)))
(*.f64 w #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) w)
(/.f64 (-.f64 (*.f64 w w) (*.f64 w w)) (-.f64 w w))
(/.f64 (+.f64 (pow.f64 w #s(literal 3 binary64)) (pow.f64 w #s(literal 3 binary64))) (+.f64 (*.f64 w w) (-.f64 (*.f64 w w) (*.f64 w w))))
(+.f64 w w)
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) M)
(*.f64 M (sqrt.f64 #s(literal -1 binary64)))
(pow.f64 #s(literal -1 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal -1 binary64))
#s(literal -1 binary64)
M
(*.f64 (/.f64 c0 w) (/.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 #s(literal 0 binary64) c0)) #s(literal 2 binary64)))
(*.f64 c0 (/.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 #s(literal 0 binary64) c0)) (*.f64 w #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 #s(literal 0 binary64) c0)) c0) w) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 #s(literal 0 binary64) c0)) c0)) (neg.f64 (*.f64 w #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 #s(literal 0 binary64) c0)) c0) (*.f64 w #s(literal 2 binary64)))
(*.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 #s(literal 0 binary64) c0)) c0)
(*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 #s(literal 0 binary64) c0)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 #s(literal 0 binary64) c0))
(*.f64 (*.f64 #s(literal -1 binary64) c0) #s(literal 0 binary64))
(*.f64 (neg.f64 c0) #s(literal 0 binary64))
(*.f64 (*.f64 #s(literal 0 binary64) c0) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))
(*.f64 (*.f64 #s(literal 0 binary64) c0) #s(literal -1 binary64))
(*.f64 #s(literal 0 binary64) c0)
(*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) c0))
(*.f64 c0 #s(literal 0 binary64))
(neg.f64 (*.f64 #s(literal 0 binary64) c0))
(+.f64 (*.f64 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) c0) (*.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)) c0))
(+.f64 (*.f64 c0 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (*.f64 #s(literal -1 binary64) c0) #s(literal 0 binary64))
(*.f64 (neg.f64 c0) #s(literal 0 binary64))
(*.f64 (*.f64 #s(literal 0 binary64) c0) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))
(*.f64 (*.f64 #s(literal 0 binary64) c0) #s(literal -1 binary64))
(*.f64 #s(literal 0 binary64) c0)
(*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) c0))
(*.f64 c0 #s(literal 0 binary64))
(neg.f64 (*.f64 #s(literal 0 binary64) c0))
(+.f64 (*.f64 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) c0) (*.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)) c0))
(+.f64 (*.f64 c0 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(literal 0 binary64)
#s(literal 0 binary64)
(*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))
(*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) h)) w)
(/.f64 (/.f64 (*.f64 d d) (*.f64 D D)) (*.f64 h w))
(/.f64 (neg.f64 (*.f64 d d)) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (pow.f64 d #s(literal 1 binary64)) (pow.f64 d #s(literal 1 binary64)))
(*.f64 (neg.f64 d) (neg.f64 d))
(*.f64 (fabs.f64 d) (fabs.f64 d))
(*.f64 d d)
(pow.f64 d #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 d) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 D D) h) w)
(*.f64 (*.f64 D D) (*.f64 h w))
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) (*.f64 D D))
(*.f64 D (*.f64 (*.f64 h w) D))
(*.f64 w (*.f64 (*.f64 D D) h))
(*.f64 (*.f64 D D) h)
(*.f64 D (*.f64 D h))
(*.f64 h (*.f64 D D))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (neg.f64 D) (neg.f64 D))
(*.f64 (fabs.f64 D) (fabs.f64 D))
(*.f64 D D)
(pow.f64 D #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 D) #s(literal 2 binary64)))
(*.f64 w #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) w)
(/.f64 (-.f64 (*.f64 w w) (*.f64 w w)) (-.f64 w w))
(/.f64 (+.f64 (pow.f64 w #s(literal 3 binary64)) (pow.f64 w #s(literal 3 binary64))) (+.f64 (*.f64 w w) (-.f64 (*.f64 w w) (*.f64 w w))))
(+.f64 w w)
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(*.f64 (/.f64 (*.f64 c0 c0) (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) h)))
(*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h))
(/.f64 (neg.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 w w))
(/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))
(*.f64 (pow.f64 (*.f64 d c0) #s(literal 1 binary64)) (pow.f64 (*.f64 d c0) #s(literal 1 binary64)))
(*.f64 (*.f64 d c0) (*.f64 d c0))
(*.f64 (*.f64 c0 c0) (*.f64 d d))
(*.f64 (*.f64 d d) (*.f64 c0 c0))
(pow.f64 (*.f64 d c0) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 d c0)) #s(literal 2 binary64)))
(*.f64 d c0)
(*.f64 c0 d)
(*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))
(*.f64 (*.f64 (*.f64 (*.f64 h w) D) D) w)
(*.f64 (*.f64 (*.f64 w w) h) (*.f64 D D))
(*.f64 (*.f64 w w) (*.f64 (*.f64 D D) h))
(*.f64 (*.f64 D D) (*.f64 (*.f64 w w) h))
(*.f64 (pow.f64 w #s(literal 1 binary64)) (pow.f64 w #s(literal 1 binary64)))
(*.f64 (neg.f64 w) (neg.f64 w))
(*.f64 (fabs.f64 w) (fabs.f64 w))
(*.f64 w w)
(pow.f64 w #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 w) #s(literal 2 binary64)))
(*.f64 (/.f64 c0 w) (/.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)) #s(literal 2 binary64)))
(*.f64 c0 (/.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)) (*.f64 w #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)) c0) w) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)) c0)) (neg.f64 (*.f64 w #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)) c0) (*.f64 w #s(literal 2 binary64)))
(*.f64 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)) c0)
(*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w))))) (neg.f64 h))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)
(+.f64 (/.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) h) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)) h))
(+.f64 (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)) h) (/.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) h))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w))) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)))) (-.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)) (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w))) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)) (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64))))))
(-.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d)))))
(-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w))))
(+.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)) (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w))
(*.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 D D) w)))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 D D)) w)
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w))
(+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))
(*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 d c0))
(*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d))
(*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0))
(+.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 d d) c0))
(*.f64 (*.f64 d c0) d)
(*.f64 (*.f64 d d) c0)
(*.f64 d (*.f64 d c0))
(*.f64 c0 (*.f64 d d))
(*.f64 (*.f64 D D) w)
(*.f64 D (*.f64 D w))
(*.f64 w (*.f64 D D))
(*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 h h) w) (pow.f64 (*.f64 M D) #s(literal 2 binary64)))) (*.f64 (*.f64 d d) c0))
#s(literal -1/2 binary64)
(*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 D D) c0) (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) w) (*.f64 d d)))
(*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 (*.f64 d d) c0)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) w) (*.f64 (*.f64 d d) c0)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 h h) w) (pow.f64 (*.f64 M D) #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 d d) c0)))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 h h) w) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) c0) (*.f64 d d))
(/.f64 (*.f64 (*.f64 (*.f64 h h) w) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) (*.f64 (*.f64 d d) c0))
(*.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 D D)) w)
(*.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) w) (*.f64 D D))
(*.f64 (*.f64 (*.f64 h h) w) (pow.f64 (*.f64 M D) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w))
(*.f64 (*.f64 D D) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) w))
(*.f64 (pow.f64 (*.f64 M D) #s(literal 1 binary64)) (pow.f64 (*.f64 M D) #s(literal 1 binary64)))
(*.f64 (*.f64 M M) (*.f64 D D))
(*.f64 (*.f64 M D) (*.f64 M D))
(*.f64 (*.f64 D D) (*.f64 M M))
(pow.f64 (*.f64 M D) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 M D)) #s(literal 2 binary64)))
(*.f64 M D)
(*.f64 D M)
(*.f64 (*.f64 h h) w)
(*.f64 h (*.f64 h w))
(*.f64 w (*.f64 h h))
(*.f64 (pow.f64 h #s(literal 1 binary64)) (pow.f64 h #s(literal 1 binary64)))
(*.f64 (neg.f64 h) (neg.f64 h))
(*.f64 (fabs.f64 h) (fabs.f64 h))
(*.f64 h h)
(pow.f64 h #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 h) #s(literal 2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) c0))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) c0) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) c0) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) c0) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (/ c0 (* 2 w)) (*.f64 (/.f64 c0 w) #s(literal 1/2 binary64)))
#s(approx c0 c0)
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) c0) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D)))
#s(approx (* 2 (* c0 (* d d))) (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)))
#s(approx (* c0 (* d d)) (*.f64 (*.f64 d d) c0))
#s(approx (* d c0) (*.f64 d c0))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) c0))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) c0) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) c0) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) c0) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (/ c0 (* 2 w)) (*.f64 (/.f64 c0 w) #s(literal 1/2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) c0))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) c0) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) c0) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) c0) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))) c0))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)) c0))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) c0) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)) c0))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) c0) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))
#s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))
#s(approx (/ (pow (* c0 d) 2) (* (* (* D D) h) (* w w))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (pow (* c0 d) 2) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))
#s(approx (* d c0) (*.f64 d c0))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 d d)) #s(literal -1/2 binary64))) c0))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 D D) w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h h) w) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) (*.f64 d d)) #s(literal -1/2 binary64))) c0))
#s(approx (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)))
#s(approx (* 2 (* c0 (* d d))) (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)))
#s(approx (* c0 (* d d)) (*.f64 (*.f64 d d) c0))
#s(approx (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d)))) (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)))
#s(approx (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))) (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/32 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 c0 c0)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 h w) D) D)))) c0))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/32 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/32 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 c0 c0)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 c0 c0)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 c0 c0)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 c0 c0)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 h w) D) D)))) c0))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h h) w) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 d d)) (*.f64 (*.f64 D D) w))) c0))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (-.f64 (/.f64 #s(literal 0 binary64) w) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 #s(literal 0 binary64) w) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 #s(literal 0 binary64) w) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))))) (*.f64 c0 c0)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 #s(literal 0 binary64) c0))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) c0)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) c0)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)))) c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (-.f64 (/.f64 #s(literal 0 binary64) w) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 #s(literal 0 binary64) w) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 #s(literal 0 binary64) w) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (-.f64 (/.f64 #s(literal 0 binary64) w) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 #s(literal 0 binary64) w) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 #s(literal 0 binary64) w) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))))) (*.f64 c0 c0)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 c0 c0)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 0 binary64)) (*.f64 c0 c0)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 c0 c0)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 #s(literal 0 binary64) c0))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) c0)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) c0)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)))) c0)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (neg.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) c0)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (neg.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 d d)) (*.f64 (*.f64 D D) w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h h) w) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 w w)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 d d))) (*.f64 w w)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* w 2) (*.f64 w #s(literal 2 binary64)))
#s(approx w w)
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 (*.f64 d d) c0)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 w w)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) w))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 (*.f64 d d) c0))) (*.f64 w w)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) w))
#s(approx (* (* (* h w) D) D) (*.f64 (*.f64 (*.f64 h w) D) D))
#s(approx (* (* h w) D) (*.f64 (*.f64 h w) D))
#s(approx (* h w) (*.f64 h w))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 w w)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 d d))) (*.f64 w w)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* w 2) (*.f64 w #s(literal 2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 w w)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 d d))) (*.f64 w w)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 d d)) #s(literal -1/2 binary64))) w))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 d d)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 w w)) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 D D) h))) w))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 d d))) (*.f64 w w)) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 D D) h))) w))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 (*.f64 d d) c0)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 w w)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) w))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 (*.f64 d d) c0))) (*.f64 w w)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) w))
#s(approx (* 0 (/ (* d d) (* (* (* D D) h) w))) #s(literal 0 binary64))
#s(approx (/ (* d d) (* (* (* D D) h) w)) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))
#s(approx (* (* (* h w) D) D) (*.f64 (*.f64 (*.f64 h w) D) D))
#s(approx (* w 2) (*.f64 w #s(literal 2 binary64)))
#s(approx (* (* (* D D) h) (* w w)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))
#s(approx (* w w) (*.f64 w w))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64))) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w))
#s(approx (* (* D D) w) (*.f64 (*.f64 D D) w))
#s(approx (* (pow (* D M) 2) (* (* h h) w)) (*.f64 (*.f64 (*.f64 h h) w) (pow.f64 (*.f64 M D) #s(literal 2 binary64))))
#s(approx (* (* h h) w) (*.f64 (*.f64 h h) w))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))) w))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))) w))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))))) w))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))) w))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))) w))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))))) w))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))) w))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))) w))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))))) w))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 (*.f64 d d) c0)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) w))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 d d) c0)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) w))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)))) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) #s(literal 1/2 binary64))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal -1/4 binary64)) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 w w)) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))))) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) #s(literal 1/2 binary64))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)))) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)))) w)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 w w)) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))))) w))) w)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)))) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) #s(literal 1/2 binary64))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal -1/4 binary64)) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 w w)) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))))) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) #s(literal 1/2 binary64))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)))) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) #s(literal 1/2 binary64))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal -1/4 binary64)) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 w w)) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))))) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) #s(literal 1/2 binary64))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)))) #s(literal -1/2 binary64)) (neg.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 w w)) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))))) w))) w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)))) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)))) w)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 w w)) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))))) w))) w)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (neg.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 (*.f64 d d) c0))) w)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (neg.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 d d) c0)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 h h)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) (*.f64 d d))) (*.f64 h h)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) w)) (*.f64 (*.f64 d d) c0)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 h h)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w))) h))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 w #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) w)) (*.f64 (*.f64 d d) c0))) (*.f64 h h)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w))) h))
#s(approx h h)
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 h h)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) (*.f64 d d))) (*.f64 h h)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 h h)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) (*.f64 d d))) (*.f64 h h)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 D D) w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h h) w) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) (*.f64 d d)) #s(literal -1/2 binary64))) h))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) w)) (*.f64 d d)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 h h)) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 D D) w))) h))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 w #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) w)) (*.f64 d d))) (*.f64 h h)) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 D D) w))) h))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) w)) (*.f64 (*.f64 d d) c0)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 h h)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w))) h))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 w #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) w)) (*.f64 (*.f64 d d) c0))) (*.f64 h h)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) w))) h))
#s(approx (* (* D D) h) (*.f64 (*.f64 D D) h))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) c0) (/.f64 (*.f64 (*.f64 h h) w) (*.f64 d d))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))))
#s(approx (* h h) (*.f64 h h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) w)) (*.f64 (*.f64 d d) c0)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h h) w) (*.f64 D D)))) h))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) w)) (*.f64 (*.f64 d d) c0)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h h) w) (*.f64 D D)))) (*.f64 h h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (pow.f64 w #s(literal 3 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))))) h)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (*.f64 h h)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64))))))) h))) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (pow.f64 w #s(literal 3 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))))) h)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (pow.f64 w #s(literal 3 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))))) h)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) (neg.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w)))) h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (*.f64 h h)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64))))))) h))) h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (*.f64 h h)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64))))))) h))) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (neg.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h h) w) (*.f64 D D))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) w)) (*.f64 (*.f64 d d) c0))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (pow.f64 D #s(literal 4 binary64))) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 h w))) (*.f64 D D)))
#s(approx D D)
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 h w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 d d)) #s(literal -1/2 binary64))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 h w))) (*.f64 D D)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 d d)) #s(literal -1/2 binary64))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (pow.f64 D #s(literal 4 binary64))) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 h w))) (*.f64 D D)))
#s(approx (* D D) (*.f64 D D))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (pow.f64 D #s(literal 4 binary64))) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) w) (pow.f64 D #s(literal 4 binary64))) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) w))) (*.f64 D D)))
#s(approx (pow (* D M) 2) (pow.f64 (*.f64 M D) #s(literal 2 binary64)))
#s(approx (* D M) (*.f64 M D))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) h) w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (pow.f64 D #s(literal 4 binary64)) w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) (*.f64 d d)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (+.f64 (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 d c0) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))) (pow.f64 D #s(literal 8 binary64))))) (*.f64 d d)) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx d d)
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) (*.f64 d d)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) (*.f64 d d)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64))) (*.f64 d d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 d d)) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 d d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (+.f64 (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 d c0) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))) (pow.f64 D #s(literal 8 binary64))))) (*.f64 d d)) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* d d) (*.f64 d d))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) c0) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 4 binary64)) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 d d)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h h) w) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) c0) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (pow.f64 d #s(literal 4 binary64)) w)))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 4 binary64))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/16 binary64))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/16 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/32 binary64)) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 d d)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64))) (*.f64 (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) (*.f64 d d)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 4 binary64))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/16 binary64))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/16 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/32 binary64)) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 4 binary64))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/16 binary64))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/16 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/32 binary64)) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/2 binary64))) (*.f64 d d)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/2 binary64))) (*.f64 d d)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 h w) D) D))))) (*.f64 d d)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 d d)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64))) (*.f64 (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) (*.f64 d d)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))))) (*.f64 d d)))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 d d)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h h) w) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 c0 (*.f64 (*.f64 D D) w)))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 d d)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 M M)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 d d) c0)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 M M)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 d d) c0))) (*.f64 M M)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 d d)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 M M)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (* (sqrt -1) M) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx M M)
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (*.f64 d d)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 M M)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 d d)) #s(literal -1/2 binary64))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 d d)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 M M)) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 d d))) (*.f64 M M)) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 d d) c0)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 M M)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 h w) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 d d) c0))) (*.f64 M M)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))))) M))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h)))))) M))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))))))) M))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 (*.f64 h w) M)) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64))) (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 (*.f64 h w) M))) M))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 (*.f64 h w) M)))) M))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))))) M))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h)))))) M))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))))))) M))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))))) M))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h)))))) M))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))))))) M))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0)) M))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0))) M))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0)))) M))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 (*.f64 h w) M)) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64))) (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 (*.f64 h w) M))) M))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 (*.f64 h w) M)))) M))
#s(approx (/ (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) h) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (*.f64 d d) c0))) (*.f64 M M)))
#s(approx (+ (/ (* 2 (* c0 (* d d))) (* (* D D) w)) (* -1/2 (/ (* (pow (* D M) 2) (* (* h h) w)) (* c0 (* d d))))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h h) w) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal -1/4 binary64)) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 (*.f64 h w) M))) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) M)) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal -1/4 binary64)) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal -1/4 binary64)) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0)) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D))) M)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0)) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) M)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D))) M)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0)) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 (*.f64 h w) M))) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) M)) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))

eval57.0ms (0.6%)

Memory
-5.6MiB live, 130.0MiB allocated; 18ms collecting garbage
Compiler

Compiled 38 520 to 2 897 computations (92.5% saved)

prune41.0ms (0.4%)

Memory
-7.0MiB live, 87.8MiB allocated; 16ms collecting garbage
Pruning

25 alts after pruning (25 fresh and 0 done)

PrunedKeptTotal
New47720497
Fresh16521
Picked505
Done000
Total49825523
Accuracy
77.0%
Counts
523 → 25
Alt Table
Click to see full alt table
StatusAccuracyProgram
16.2%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 D D)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h))) (*.f64 w #s(literal 2 binary64)))
29.4%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 w #s(literal 2 binary64)))
4.8%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 c0 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))))) (*.f64 w #s(literal 2 binary64)))
34.7%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (*.f64 w #s(literal 2 binary64)))
39.4%
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 w #s(literal 2 binary64)))
22.2%
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 c0 c0))) (*.f64 w #s(literal 2 binary64)))
33.1%
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
36.7%
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
4.3%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))))
20.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
35.2%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D)) D)))
36.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 D h) w) D))))
37.2%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h (*.f64 w D)) D))))
32.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) (*.f64 D D)))))
34.3%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))))
34.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)))))
39.1%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 h w) D) D) w)))
34.4%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 D h)) (*.f64 w w))))
31.3%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
27.6%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) h))
31.7%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
17.8%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (exp.f64 (*.f64 (log.f64 (*.f64 d c0)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
23.0%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 c0 c0) (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) h))))
26.1%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (-.f64 (/.f64 #s(literal 0 binary64) w) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))) (*.f64 c0 c0)))
23.8%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
Compiler

Compiled 3 158 to 1 564 computations (50.5% saved)

series185.0ms (1.9%)

Memory
5.7MiB live, 235.4MiB allocated; 25ms collecting garbage
Counts
41 → 250
Calls
Call 1
Inputs
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 w #s(literal 2 binary64)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))
#s(literal 2 binary64)
(pow.f64 (*.f64 d c0) #s(literal 2 binary64))
(*.f64 d c0)
d
c0
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) D)
(*.f64 h w)
h
w
D
(*.f64 w #s(literal 2 binary64))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (*.f64 w #s(literal 2 binary64)))
(*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))
#s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
(*.f64 #s(literal 2 binary64) w)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))
(*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))
(*.f64 d d)
(/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D)) D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D)) D))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D)) D)
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D))
(*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64))
(*.f64 (*.f64 d d) c0)
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
(/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h))
(/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 D D))
(*.f64 D D)
(*.f64 (*.f64 w w) h)
(*.f64 w w)
Outputs
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (* c0 (sqrt -1)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (/ (* 2 (pow (* d c0) 2)) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (pow (* d c0) 2)) #s(hole binary64 (* 2 (* (pow c0 2) (pow d 2)))))
#s(approx (pow (* d c0) 2) #s(hole binary64 (* (pow c0 2) (pow d 2))))
#s(approx (* d c0) #s(hole binary64 (* c0 d)))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(hole binary64 0))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* (* (* d d) (/ c0 (* (* (* h w) D) D))) 2) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (* d d) (/ c0 (* (* (* h w) D) D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (/ c0 (* (* (* h w) D) D)) #s(hole binary64 (/ c0 (* (pow D 2) (* h w)))))
#s(approx (/ (/ (* (* (* d d) c0) 2) (* (* h w) D)) D) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (* (* (* d d) c0) 2) (* (* h w) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* D (* h w))))))
#s(approx (* (* (* d d) c0) 2) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* d d) c0) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (/ (/ (pow (* d c0) 2) (* D D)) (* (* w w) h)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (pow (* d c0) 2) (* D D)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6))))))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10))))))))) w)))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx w #s(hole binary64 w))
#s(approx (* w 2) #s(hole binary64 (* 2 w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* w w) h) #s(hole binary64 (* h (pow w 2))))
#s(approx (* w w) #s(hole binary64 (pow w 2)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx d #s(hole binary64 d))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 12)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10)))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
Calls

18 calls:

TimeVariablePointExpression
52.0ms
h
@-inf
((/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/ (* 2 (pow (* d c0) 2)) (* (* (* h w) D) D)) (* 2 (pow (* d c0) 2)) 2 (pow (* d c0) 2) (* d c0) d c0 (* (* (* h w) D) D) (* (* h w) D) (* h w) h w D (* w 2) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) 0 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) (* 2 w) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (* (* d d) (/ c0 (* (* (* h w) D) D))) 2) (* (* d d) (/ c0 (* (* (* h w) D) D))) (* d d) (/ c0 (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (/ (* (* (* d d) c0) 2) (* (* h w) D)) D) (/ (* (* (* d d) c0) 2) (* (* h w) D)) (* (* (* d d) c0) 2) (* (* d d) c0) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/ (/ (pow (* d c0) 2) (* D D)) (* (* w w) h)) (/ (pow (* d c0) 2) (* D D)) (* D D) (* (* w w) h) (* w w))
18.0ms
d
@0
((/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/ (* 2 (pow (* d c0) 2)) (* (* (* h w) D) D)) (* 2 (pow (* d c0) 2)) 2 (pow (* d c0) 2) (* d c0) d c0 (* (* (* h w) D) D) (* (* h w) D) (* h w) h w D (* w 2) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) 0 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) (* 2 w) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (* (* d d) (/ c0 (* (* (* h w) D) D))) 2) (* (* d d) (/ c0 (* (* (* h w) D) D))) (* d d) (/ c0 (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (/ (* (* (* d d) c0) 2) (* (* h w) D)) D) (/ (* (* (* d d) c0) 2) (* (* h w) D)) (* (* (* d d) c0) 2) (* (* d d) c0) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/ (/ (pow (* d c0) 2) (* D D)) (* (* w w) h)) (/ (pow (* d c0) 2) (* D D)) (* D D) (* (* w w) h) (* w w))
10.0ms
c0
@inf
((/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/ (* 2 (pow (* d c0) 2)) (* (* (* h w) D) D)) (* 2 (pow (* d c0) 2)) 2 (pow (* d c0) 2) (* d c0) d c0 (* (* (* h w) D) D) (* (* h w) D) (* h w) h w D (* w 2) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) 0 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) (* 2 w) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (* (* d d) (/ c0 (* (* (* h w) D) D))) 2) (* (* d d) (/ c0 (* (* (* h w) D) D))) (* d d) (/ c0 (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (/ (* (* (* d d) c0) 2) (* (* h w) D)) D) (/ (* (* (* d d) c0) 2) (* (* h w) D)) (* (* (* d d) c0) 2) (* (* d d) c0) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/ (/ (pow (* d c0) 2) (* D D)) (* (* w w) h)) (/ (pow (* d c0) 2) (* D D)) (* D D) (* (* w w) h) (* w w))
8.0ms
c0
@-inf
((/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/ (* 2 (pow (* d c0) 2)) (* (* (* h w) D) D)) (* 2 (pow (* d c0) 2)) 2 (pow (* d c0) 2) (* d c0) d c0 (* (* (* h w) D) D) (* (* h w) D) (* h w) h w D (* w 2) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) 0 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) (* 2 w) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (* (* d d) (/ c0 (* (* (* h w) D) D))) 2) (* (* d d) (/ c0 (* (* (* h w) D) D))) (* d d) (/ c0 (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (/ (* (* (* d d) c0) 2) (* (* h w) D)) D) (/ (* (* (* d d) c0) 2) (* (* h w) D)) (* (* (* d d) c0) 2) (* (* d d) c0) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/ (/ (pow (* d c0) 2) (* D D)) (* (* w w) h)) (/ (pow (* d c0) 2) (* D D)) (* D D) (* (* w w) h) (* w w))
7.0ms
w
@inf
((/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/ (* 2 (pow (* d c0) 2)) (* (* (* h w) D) D)) (* 2 (pow (* d c0) 2)) 2 (pow (* d c0) 2) (* d c0) d c0 (* (* (* h w) D) D) (* (* h w) D) (* h w) h w D (* w 2) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) 0 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) (* 2 w) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (* (* d d) (/ c0 (* (* (* h w) D) D))) 2) (* (* d d) (/ c0 (* (* (* h w) D) D))) (* d d) (/ c0 (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (/ (* (* (* d d) c0) 2) (* (* h w) D)) D) (/ (* (* (* d d) c0) 2) (* (* h w) D)) (* (* (* d d) c0) 2) (* (* d d) c0) (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/ (/ (pow (* d c0) 2) (* D D)) (* (* w w) h)) (/ (pow (* d c0) 2) (* D D)) (* D D) (* (* w w) h) (* w w))

rewrite266.0ms (2.8%)

Memory
20.7MiB live, 353.9MiB allocated; 63ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0129223282
0134020921
1754320921
0868420921
Stop Event
iter limit
node limit
iter limit
Counts
291 → 402
Calls
Call 1
Inputs
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 w #s(literal 2 binary64)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))
#s(literal 2 binary64)
(pow.f64 (*.f64 d c0) #s(literal 2 binary64))
(*.f64 d c0)
d
c0
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) D)
(*.f64 h w)
h
w
D
(*.f64 w #s(literal 2 binary64))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (*.f64 w #s(literal 2 binary64)))
(*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))
#s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
(*.f64 #s(literal 2 binary64) w)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))
(*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))
(*.f64 d d)
(/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D)) D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D)) D))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D)) D)
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D))
(*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64))
(*.f64 (*.f64 d d) c0)
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
(/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h))
(/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 D D))
(*.f64 D D)
(*.f64 (*.f64 w w) h)
(*.f64 w w)
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (* c0 (sqrt -1)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (/ (* 2 (pow (* d c0) 2)) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (pow (* d c0) 2)) #s(hole binary64 (* 2 (* (pow c0 2) (pow d 2)))))
#s(approx (pow (* d c0) 2) #s(hole binary64 (* (pow c0 2) (pow d 2))))
#s(approx (* d c0) #s(hole binary64 (* c0 d)))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(hole binary64 0))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* (* (* d d) (/ c0 (* (* (* h w) D) D))) 2) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (* d d) (/ c0 (* (* (* h w) D) D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (/ c0 (* (* (* h w) D) D)) #s(hole binary64 (/ c0 (* (pow D 2) (* h w)))))
#s(approx (/ (/ (* (* (* d d) c0) 2) (* (* h w) D)) D) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (* (* (* d d) c0) 2) (* (* h w) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* D (* h w))))))
#s(approx (* (* (* d d) c0) 2) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* d d) c0) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (/ (/ (pow (* d c0) 2) (* D D)) (* (* w w) h)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (pow (* d c0) 2) (* D D)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6))))))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10))))))))) w)))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx w #s(hole binary64 w))
#s(approx (* w 2) #s(hole binary64 (* 2 w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* w w) h) #s(hole binary64 (* h (pow w 2))))
#s(approx (* w w) #s(hole binary64 (pow w 2)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) (pow D 2))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx d #s(hole binary64 d))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 12)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10)))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* M (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
Outputs
(/.f64 (/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D))) w) #s(literal 2 binary64))
(/.f64 (neg.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D)))) (neg.f64 (*.f64 #s(literal 2 binary64) w)))
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D))) (*.f64 #s(literal 2 binary64) w))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D)))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D))
(*.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)))
(/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 D (*.f64 w h))) D)
(/.f64 (neg.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 D (*.f64 w h)) D)))
(/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D))
(+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 c0)) (*.f64 d d))
(*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))
(+.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))
#s(literal 2 binary64)
(*.f64 (pow.f64 (*.f64 d c0) #s(literal 1 binary64)) (pow.f64 (*.f64 d c0) #s(literal 1 binary64)))
(*.f64 (*.f64 d c0) (*.f64 d c0))
(*.f64 (*.f64 c0 c0) (*.f64 d d))
(*.f64 (*.f64 d d) (*.f64 c0 c0))
(pow.f64 (*.f64 d c0) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 d c0)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 d c0)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 d c0)) #s(literal 2 binary64))))
(*.f64 d c0)
(*.f64 c0 d)
d
c0
(*.f64 (*.f64 (*.f64 D D) h) w)
(*.f64 (*.f64 D D) (*.f64 w h))
(*.f64 (*.f64 D (*.f64 w h)) D)
(*.f64 D (*.f64 D (*.f64 w h)))
(*.f64 (*.f64 w h) (*.f64 D D))
(*.f64 w (*.f64 (*.f64 D D) h))
(*.f64 (*.f64 D h) w)
(*.f64 D (*.f64 w h))
(*.f64 (*.f64 w h) D)
(*.f64 h (*.f64 w D))
(*.f64 w h)
(*.f64 h w)
h
w
D
(*.f64 #s(literal 2 binary64) w)
(*.f64 w #s(literal 2 binary64))
(+.f64 w w)
(*.f64 (/.f64 c0 w) (/.f64 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))) #s(literal 2 binary64)))
(*.f64 c0 (/.f64 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))) (*.f64 #s(literal 2 binary64) w)))
(/.f64 (/.f64 (*.f64 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))) c0) w) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))) c0)) (neg.f64 (*.f64 #s(literal 2 binary64) w)))
(/.f64 (*.f64 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))) c0) (*.f64 #s(literal 2 binary64) w))
(*.f64 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))) c0)
(*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))
#s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64)))) (/.f64 (/.f64 c0 #s(literal 2 binary64)) w))
(*.f64 (/.f64 (/.f64 c0 #s(literal 2 binary64)) w) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64)))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) w))
(/.f64 (/.f64 c0 #s(literal 2 binary64)) w)
(/.f64 (neg.f64 c0) (neg.f64 (*.f64 #s(literal 2 binary64) w)))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
(*.f64 #s(literal 2 binary64) w)
(*.f64 w #s(literal 2 binary64))
(+.f64 w w)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)) #s(literal 2 binary64))
(*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 d d) c0) (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))))) (neg.f64 D))
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D))
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h)))) D)
(+.f64 (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 d d) (*.f64 D (*.f64 w h))) (/.f64 c0 D))
(*.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)))
(*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 w h)))
(*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d))
(*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)))
(*.f64 d (*.f64 d (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D))))
(*.f64 c0 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))
(/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 w h))
(/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (neg.f64 (*.f64 (*.f64 D (*.f64 w h)) D)))
(/.f64 (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w)) (*.f64 D D))
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) D) (*.f64 w h)) D)
(/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D (*.f64 w h)) D))
(*.f64 (pow.f64 d #s(literal 1 binary64)) (pow.f64 d #s(literal 1 binary64)))
(*.f64 (neg.f64 d) (neg.f64 d))
(*.f64 (fabs.f64 d) (fabs.f64 d))
(*.f64 d d)
(pow.f64 d #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 d) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 d) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 d) #s(literal 2 binary64))))
(/.f64 (/.f64 c0 (*.f64 D (*.f64 w h))) D)
(/.f64 (/.f64 c0 (*.f64 D D)) (*.f64 w h))
(/.f64 (neg.f64 c0) (neg.f64 (*.f64 (*.f64 D (*.f64 w h)) D)))
(/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D))
(*.f64 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64)))) (/.f64 (/.f64 c0 #s(literal 2 binary64)) w))
(*.f64 (/.f64 (/.f64 c0 #s(literal 2 binary64)) w) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64)))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)) #s(literal 2 binary64))
(*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 d d) c0) (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))))) (neg.f64 D))
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D))
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h)))) D)
(+.f64 (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)))
(*.f64 (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w)) (/.f64 #s(literal 2 binary64) D))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) D) (*.f64 w h)) #s(literal 2 binary64))
(*.f64 (*.f64 (*.f64 d d) c0) (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))))
(*.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) D) (*.f64 w h)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64))) (neg.f64 (*.f64 D (*.f64 w h))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 w h)) D)
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 D (*.f64 w h)))
(+.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) D) (*.f64 w h)) (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) D) (*.f64 w h)))
(*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d))
(*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64))
(*.f64 (*.f64 d d) (*.f64 c0 #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0))
(+.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 d d) c0))
(*.f64 (*.f64 d c0) d)
(*.f64 (*.f64 d d) c0)
(*.f64 d (*.f64 d c0))
(*.f64 c0 (*.f64 d d))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h))
(*.f64 (/.f64 (*.f64 c0 c0) (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) h)))
(*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(/.f64 (neg.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D)) (neg.f64 (*.f64 (*.f64 w w) h)))
(/.f64 (neg.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h)
(/.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D) (*.f64 (*.f64 w w) h))
(/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))
(*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 D D)))
(/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D)
(/.f64 (neg.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (neg.f64 (*.f64 D D)))
(/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 D D))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (neg.f64 D) (neg.f64 D))
(*.f64 (fabs.f64 D) (fabs.f64 D))
(*.f64 D D)
(pow.f64 D #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 D) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 D) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 D) #s(literal 2 binary64))))
(*.f64 (*.f64 w w) h)
(*.f64 w (*.f64 w h))
(*.f64 h (*.f64 w w))
(*.f64 (pow.f64 w #s(literal 1 binary64)) (pow.f64 w #s(literal 1 binary64)))
(*.f64 (neg.f64 w) (neg.f64 w))
(*.f64 (fabs.f64 w) (fabs.f64 w))
(*.f64 w w)
(pow.f64 w #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 w) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 w) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 w) #s(literal 2 binary64))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) c0))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) c0) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) c0) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) c0) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)) c0))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)) c0))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) c0) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)) c0))
#s(approx (/ (* 2 (pow (* d c0) 2)) (* (* (* h w) D) D)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D)))
#s(approx (* 2 (pow (* d c0) 2)) (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)))
#s(approx (pow (* d c0) 2) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))
#s(approx (* d c0) (*.f64 d c0))
#s(approx c0 c0)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) c0) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) c0))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) c0) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) c0) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) c0) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (/ c0 (* 2 w)) (*.f64 (/.f64 c0 w) #s(literal 1/2 binary64)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) c0) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (/ (* (* (* d d) c0) 2) (* (* h w) D)) D) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64))))
#s(approx (* (* d d) (/ c0 (* (* (* h w) D) D))) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)))
#s(approx (/ c0 (* (* (* h w) D) D)) (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)))
#s(approx (/ (/ (* (* (* d d) c0) 2) (* (* h w) D)) D) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64))))
#s(approx (/ (* (* (* d d) c0) 2) (* (* h w) D)) (*.f64 (*.f64 (*.f64 d d) c0) (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h)))))
#s(approx (* (* (* d d) c0) 2) (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)))
#s(approx (* (* d d) c0) (*.f64 (*.f64 d d) c0))
#s(approx (/ (/ (pow (* d c0) 2) (* D D)) (* (* w w) h)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h))
#s(approx (/ (pow (* d c0) 2) (* D D)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/32 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 c0 c0)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 c0 c0)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 c0 c0)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))))) (*.f64 c0 c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))))) c0))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/32 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 c0 c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))))) c0))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (-.f64 (/.f64 #s(literal 0 binary64) w) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (/.f64 #s(literal 0 binary64) w)) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (/.f64 #s(literal 0 binary64) w) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64)))) (*.f64 c0 c0)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 c0 c0)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 0 binary64)) (*.f64 c0 c0)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 c0 c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(literal 0 binary64) c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)))) c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (-.f64 (/.f64 #s(literal 0 binary64) w) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (/.f64 #s(literal 0 binary64) w)) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (/.f64 #s(literal 0 binary64) w) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64))))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64)))) (*.f64 c0 c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(literal 0 binary64) c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64)) (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)))) c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 d d)) #s(literal -1/2 binary64))) w))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)) #s(literal -1/2 binary64))) (*.f64 w w)) (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) w))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)) #s(literal -1/2 binary64))) (*.f64 w w)) (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) w))
#s(approx (* (* (* h w) D) D) (*.f64 (*.f64 D (*.f64 w h)) D))
#s(approx (* (* h w) D) (*.f64 D (*.f64 w h)))
#s(approx (* h w) (*.f64 w h))
#s(approx w w)
#s(approx (* w 2) (*.f64 #s(literal 2 binary64) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* w 2) (*.f64 #s(literal 2 binary64) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 w w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h))) w))
#s(approx (* (* w w) h) (*.f64 (*.f64 w w) h))
#s(approx (* w w) (*.f64 w w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))))) w))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)))) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) #s(literal 1/2 binary64))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal -1/4 binary64)) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 w w)) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))))) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) #s(literal 1/2 binary64))) w)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)))) #s(literal -1/2 binary64)) (neg.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 w w)) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))))) w))) w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)))) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)))) w)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 w w)) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))))) w))) w)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)))) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) #s(literal 1/2 binary64))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal -1/4 binary64)) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 w w)) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))))) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)))) w)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) #s(literal 1/2 binary64))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)))) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)))) w)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) h)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 w w)) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))))))) w))) w)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (*.f64 (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 d d)) #s(literal -1/2 binary64))) h))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 d d)) #s(literal -1/2 binary64))) (*.f64 h h)) (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w))) h))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 w #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 d d)) #s(literal -1/2 binary64))) (*.f64 h h)) (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w))) h))
#s(approx h h)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 w #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (*.f64 (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 w #s(literal 3 binary64))) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 h h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) w) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (pow.f64 w #s(literal 3 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) (neg.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w)))) h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D D) w)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (*.f64 h h)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64))))))) h))) h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (*.f64 h h)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64))))))) h))) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (pow.f64 w #s(literal 3 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)))) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) w)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (*.f64 h h)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64))))))) h))) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 w h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 d d)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 w h))) (*.f64 D D)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 d d))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 w h))) (*.f64 D D)))
#s(approx D D)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 w h)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) c0) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 d d))) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 w h))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 w h))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 w h)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) c0) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 d d))) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 6 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 w h))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 10 binary64)))))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 w h))) (*.f64 D D)))
#s(approx (* D D) (*.f64 D D))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) (*.f64 d d)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64))) (*.f64 d d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 d d)) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 D (*.f64 w h)) D))) (*.f64 d d)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx d d)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D))) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 d c0) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))) (pow.f64 D #s(literal 8 binary64))))) (*.f64 d d)) (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D))) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) (*.f64 d d)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D))) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 d c0) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64))) (pow.f64 M #s(literal 3 binary64))) (pow.f64 D #s(literal 8 binary64))))) (*.f64 d d)) (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D))) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* d d) (*.f64 d d))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/4 binary64)) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/4 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/16 binary64))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/4 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/16 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/32 binary64)) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/2 binary64))) (*.f64 d d)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 D (*.f64 w h)) D)))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/2 binary64))) (*.f64 d d)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 D (*.f64 w h)) D))))) (*.f64 d d)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)))) (*.f64 d d)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64))) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64))) (*.f64 d d)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D))))) (*.f64 d d)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/4 binary64)) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/4 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/16 binary64))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/4 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/16 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/32 binary64)) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)))) (*.f64 d d)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64))) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64))) (*.f64 d d)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (*.f64 (pow.f64 d #s(literal 4 binary64)) c0)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 M #s(literal 4 binary64))) (pow.f64 d #s(literal 8 binary64)))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (pow.f64 M #s(literal 6 binary64))) (pow.f64 d #s(literal 12 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D))))) (*.f64 d d)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)) #s(literal -1/4 binary64)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 M M)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (*.f64 d d)) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 M M)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D))))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d))) (*.f64 M M)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64)) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 d d) c0)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 M M)) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 d d) c0))) (*.f64 M M)) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)) #s(literal -1/4 binary64)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 M M)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 c0 c0)) (/.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 w w)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (pow.f64 w #s(literal 4 binary64))) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 w h)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64)) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 d d) c0)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 M M)) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 c0 #s(literal 3 binary64))) (/.f64 (pow.f64 (*.f64 w h) #s(literal 3 binary64)) (pow.f64 d #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 D #s(literal 10 binary64)) (pow.f64 c0 #s(literal 5 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 w h) #s(literal 5 binary64)) (*.f64 M M)) (pow.f64 d #s(literal 10 binary64)))))) (*.f64 M M)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 (*.f64 d d) c0))) (*.f64 M M)) (*.f64 (*.f64 d d) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) #s(literal 2 binary64)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D) (*.f64 (*.f64 (*.f64 w w) h) M)))) M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D) (*.f64 (*.f64 (*.f64 w w) h) M))))) M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D) (*.f64 (*.f64 (*.f64 w w) h) M)))))) M))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (/.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D) (*.f64 M (*.f64 w h))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0)) M))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (/.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D) (*.f64 M (*.f64 w h))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0))) M))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (+.f64 (/.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D) (*.f64 M (*.f64 w h))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0)))) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 w h))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 w h)))) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 w h))))) M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D) (*.f64 (*.f64 (*.f64 w w) h) M)))) M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D) (*.f64 (*.f64 (*.f64 w w) h) M))))) M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/16 binary64)) (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 d #s(literal 4 binary64))) (pow.f64 D #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (/.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D) (*.f64 (*.f64 (*.f64 w w) h) M)))))) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 w h))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 w h)))) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 w h))))) M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal -1/4 binary64)) (*.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h) #s(literal 1/2 binary64))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D) (*.f64 M (*.f64 w h)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0)) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D))) M)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0)) M)))
#s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) M)) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 w h)) D))) M)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 w h)))) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) M)) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 c0 #s(literal 3 binary64)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal -1/4 binary64)) (*.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h) #s(literal 1/2 binary64))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (pow.f64 w #s(literal 5 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/16 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 c0 #s(literal 3 binary64)) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 w #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w))) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 w h)))) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) M) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 c0 #s(literal 4 binary64)) (pow.f64 D #s(literal 8 binary64))) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (pow.f64 w #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) (pow.f64 h #s(literal 4 binary64)))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 w h) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) M)) (*.f64 (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)) (*.f64 d d))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))

eval48.0ms (0.5%)

Memory
0.6MiB live, 91.3MiB allocated; 9ms collecting garbage
Compiler

Compiled 31 082 to 2 126 computations (93.2% saved)

prune134.0ms (1.4%)

Memory
7.0MiB live, 150.5MiB allocated; 16ms collecting garbage
Pruning

30 alts after pruning (30 fresh and 0 done)

PrunedKeptTotal
New39316409
Fresh61420
Picked505
Done000
Total40430434
Accuracy
79.3%
Counts
434 → 30
Alt Table
Click to see full alt table
StatusAccuracyProgram
29.4%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 w #s(literal 2 binary64)))
4.8%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 c0 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))))) (*.f64 w #s(literal 2 binary64)))
34.7%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
41.6%
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 D (*.f64 w h))) D)) (*.f64 w #s(literal 2 binary64)))
39.9%
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D h) w) D))) (*.f64 w #s(literal 2 binary64)))
39.4%
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d c0) (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 w #s(literal 2 binary64)))
40.3%
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D))) (*.f64 w #s(literal 2 binary64)))
22.2%
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 c0 c0))) (*.f64 w #s(literal 2 binary64)))
33.1%
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
36.7%
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
4.3%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))))
20.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
35.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 w h)) D) D)))
38.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d c0) d) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D)) D)))
34.6%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w)) (/.f64 #s(literal 2 binary64) D)) D)))
36.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 D h) w) D))))
34.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 D (*.f64 w h))) (/.f64 c0 D)) #s(literal 2 binary64))))
34.5%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 h (*.f64 w D)) D))) #s(literal 2 binary64))))
44.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d (*.f64 d (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)))) #s(literal 2 binary64))))
35.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 c0 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) #s(literal 2 binary64))))
39.1%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 h w) D) D) w)))
34.4%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 D h)) (*.f64 w w))))
41.0%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h))
31.3%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
17.5%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (*.f64 d c0)) #s(literal 2 binary64))) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
31.7%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
23.4%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 D D))) (*.f64 (*.f64 w w) h)))
17.8%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (exp.f64 (*.f64 (log.f64 (*.f64 d c0)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
26.1%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (-.f64 (/.f64 #s(literal 0 binary64) w) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))) (*.f64 c0 c0)))
23.8%
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
Compiler

Compiled 7 275 to 1 405 computations (80.7% saved)

regimes221.0ms (2.3%)

Memory
-32.2MiB live, 450.9MiB allocated; 37ms collecting garbage
Counts
79 → 2
Calls
Call 1
Inputs
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 c0 c0) (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) h))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 D D))) (*.f64 (*.f64 w w) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 c0 c0)) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) w)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d (*.f64 d (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)))) #s(literal 2 binary64))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 h (*.f64 w D)) D))) #s(literal 2 binary64))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) (*.f64 D D)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h (*.f64 w D)) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 D h) w) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d c0) (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 w #s(literal 2 binary64)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 c0 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) #s(literal 2 binary64))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 D (*.f64 w h))) (/.f64 c0 D)) #s(literal 2 binary64))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d c0) d) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D)) D)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D)) D)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 h w) D)) D))) (*.f64 #s(literal 2 binary64) w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 w h)) D) D)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w)) (/.f64 #s(literal 2 binary64) D)) D)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(*.f64 (/.f64 c0 (+.f64 w w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 c0 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))))) (*.f64 w #s(literal 2 binary64)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 D D)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h))) (*.f64 w #s(literal 2 binary64)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 D h)) (*.f64 w w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 h w) D) D) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (*.f64 M M) h)) (*.f64 d d)))) (*.f64 D D)))
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 w #s(literal 2 binary64)))
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D h) w) D))) (*.f64 w #s(literal 2 binary64)))
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D))) (*.f64 w #s(literal 2 binary64)))
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 D (*.f64 w h))) D)) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 h w)) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(/.f64 (*.f64 c0 (+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 M M))))) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 D D) w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) h)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h))) (*.f64 w #s(literal 2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (exp.f64 (*.f64 (log.f64 (*.f64 d c0)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (*.f64 d c0)) #s(literal 2 binary64))) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (-.f64 (/.f64 #s(literal 0 binary64) w) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))) (*.f64 c0 c0)))
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 c0 c0))) (*.f64 w #s(literal 2 binary64)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64))) #s(literal -1/4 binary64)) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 d d) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 d #s(literal 4 binary64)))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/4 binary64)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (pow.f64 D #s(literal 4 binary64))) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) h)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) d) (/.f64 (pow.f64 D #s(literal 4 binary64)) d)) #s(literal -1/4 binary64)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 w w) h))) D) D))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) w) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) c0)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 h w)) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (*.f64 h (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D D) (pow.f64 (*.f64 h w) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (*.f64 d d)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (pow.f64 (*.f64 M h) #s(literal 2 binary64))) (*.f64 d d)))) h))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M h) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (*.f64 h (+.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (pow.f64 (*.f64 h w) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 M M)) (*.f64 d d)))))) (*.f64 D D)))
Outputs
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 D (*.f64 w h))) D)) (*.f64 w #s(literal 2 binary64)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
Calls

10 calls:

25.0ms
(*.f64 M M)
22.0ms
M
22.0ms
h
22.0ms
D
21.0ms
c0
Results
AccuracySegmentsBranch
45.6%2(*.f64 M M)
44.0%1(*.f64 D D)
46.3%2(*.f64 d d)
55.8%2(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
47.5%3c0
50.3%4w
44.0%1h
44.0%1D
48.9%3d
45.6%2M
Compiler

Compiled 67 to 78 computations (-16.4% saved)

regimes15.0ms (0.2%)

Memory
33.7MiB live, 33.7MiB allocated; 0ms collecting garbage
Counts
54 → 2
Calls
Call 1
Inputs
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 c0 c0) (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) h))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 D D))) (*.f64 (*.f64 w w) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 c0 c0)) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) w)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d (*.f64 d (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)))) #s(literal 2 binary64))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 h (*.f64 w D)) D))) #s(literal 2 binary64))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) (*.f64 D D)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h (*.f64 w D)) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 D h) w) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d c0) (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 w #s(literal 2 binary64)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) (/.f64 c0 D)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 c0 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))) #s(literal 2 binary64))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 D (*.f64 w h))) (/.f64 c0 D)) #s(literal 2 binary64))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d c0) d) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D)) D)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 (*.f64 h w) D)) D)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 h w) D)) D))) (*.f64 #s(literal 2 binary64) w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64)) (*.f64 w h)) D) D)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 (*.f64 (/.f64 c0 h) (/.f64 (*.f64 d d) w)) (/.f64 #s(literal 2 binary64) D)) D)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(*.f64 (/.f64 c0 (+.f64 w w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (+.f64 (*.f64 c0 (neg.f64 (*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w)))) (*.f64 (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D)))))) (*.f64 w #s(literal 2 binary64)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 D D)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))))) h))) (*.f64 w #s(literal 2 binary64)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (* D D)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) h) (*.f64 d d)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 D (*.f64 D h)) (*.f64 w w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 h w) D) D) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (/.f64 (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 2 binary64)) h) (*.f64 w w))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (/ (pow (* c0 d) 2) (* (* w w) h)) (* (/ (* (* (* M M) h) (pow D 4)) (* d d)) -1/4)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (*.f64 M M) h)) (*.f64 d d)))) (*.f64 D D)))
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 c0 d) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 w #s(literal 2 binary64)))
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D h) w) D))) (*.f64 w #s(literal 2 binary64)))
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 d c0) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 D (*.f64 w h))) (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D))) (*.f64 w #s(literal 2 binary64)))
Outputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d (*.f64 d (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)))) #s(literal 2 binary64))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
Calls

1 calls:

11.0ms
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Results
AccuracySegmentsBranch
55.4%2(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Compiler

Compiled 52 to 21 computations (59.6% saved)

regimes5.0ms (0.1%)

Memory
-37.0MiB live, 10.2MiB allocated; 1ms collecting garbage
Counts
13 → 2
Calls
Call 1
Inputs
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 c0 c0) (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) h))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 D D))) (*.f64 (*.f64 w w) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 c0 c0)) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) w)))
Outputs
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
Calls

1 calls:

4.0ms
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Results
AccuracySegmentsBranch
54.3%2(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Compiler

Compiled 52 to 21 computations (59.6% saved)

regimes3.0ms (0%)

Memory
11.0MiB live, 11.0MiB allocated; 0ms collecting garbage
Counts
9 → 2
Calls
Call 1
Inputs
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (/.f64 (*.f64 c0 c0) (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) h))))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 D D))) (*.f64 (*.f64 w w) h)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
Outputs
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
Calls

1 calls:

2.0ms
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Results
AccuracySegmentsBranch
51.4%2(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Compiler

Compiled 52 to 21 computations (59.6% saved)

regimes2.0ms (0%)

Memory
3.9MiB live, 3.9MiB allocated; 0ms collecting garbage
Counts
5 → 2
Calls
Call 1
Inputs
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
Outputs
#s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
Calls

1 calls:

2.0ms
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Results
AccuracySegmentsBranch
48.7%2(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Compiler

Compiled 52 to 21 computations (59.6% saved)

regimes18.0ms (0.2%)

Memory
-1.2MiB live, 45.9MiB allocated; 1ms collecting garbage
Accuracy

Total -22.2b remaining (-53.1%)

Threshold costs -22.2b (-53.1%)

Counts
4 → 1
Calls
Call 1
Inputs
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (*.f64 w #s(literal 2 binary64)))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
Outputs
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
Calls

10 calls:

2.0ms
(*.f64 M M)
2.0ms
D
2.0ms
c0
2.0ms
d
2.0ms
w
Results
AccuracySegmentsBranch
34.7%1(*.f64 D D)
34.7%1h
34.7%1D
34.7%1(*.f64 M M)
34.7%1M
34.7%1c0
34.7%1(*.f64 d d)
34.7%1w
34.7%1d
34.7%1(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Compiler

Compiled 67 to 78 computations (-16.4% saved)

bsearch2.0ms (0%)

Memory
4.2MiB live, 4.2MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 55 to 30 computations (45.5% saved)

bsearch1.0ms (0%)

Memory
2.9MiB live, 2.9MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 55 to 30 computations (45.5% saved)

bsearch1.0ms (0%)

Memory
2.7MiB live, 2.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 55 to 30 computations (45.5% saved)

bsearch0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 55 to 30 computations (45.5% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 55 to 30 computations (45.5% saved)

simplify55.0ms (0.6%)

Memory
14.9MiB live, 62.4MiB allocated; 2ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
098841
1213823
2914823
35512823
Stop Event
node limit
Calls
Call 1
Inputs
(if (<=.f64 (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))) #s(literal +inf.0 binary64)) (/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 D (*.f64 w h))) D)) (*.f64 w #s(literal 2 binary64))) (/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w)))
(if (<=.f64 (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))) #s(literal +inf.0 binary64)) (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d (*.f64 d (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)))) #s(literal 2 binary64)))) (/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w)))
(if (<=.f64 (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))) #s(literal +inf.0 binary64)) (*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))) (/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w)))
(if (<=.f64 (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))) #s(literal +inf.0 binary64)) #s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w)))
(if (<=.f64 (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))) #s(literal +inf.0 binary64)) #s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))
Outputs
(if (<=.f64 (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))) #s(literal +inf.0 binary64)) (/.f64 #s(approx (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 D (*.f64 w h))) D)) (*.f64 w #s(literal 2 binary64))) (/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w)))
(if (<=.f64 (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))) #s(literal +inf.0 binary64)) (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d (*.f64 d (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)))) #s(literal 2 binary64)))) (/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w)))
(if (<=.f64 (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))) #s(literal +inf.0 binary64)) (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (*.f64 (*.f64 d (*.f64 d (/.f64 c0 (*.f64 (*.f64 D (*.f64 w h)) D)))) #s(literal 2 binary64)))) (/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w)))
(if (<=.f64 (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))) #s(literal +inf.0 binary64)) (*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))) (/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w)))
(if (<=.f64 (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))) #s(literal +inf.0 binary64)) (*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))) (/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w)))
(if (<=.f64 (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))) #s(literal +inf.0 binary64)) #s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w)))
(if (<=.f64 (*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))) #s(literal +inf.0 binary64)) #s(approx (/ (* c0 (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M))))) (* w 2)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* (* d d) c0) (* (* (* h w) D) D)) (sqrt (- (pow (/ (* (* d d) c0) (* (* (* h w) D) D)) 2) (* M M)))) #s(approx (neg (* c0 (* 0 (/ (* d d) (* (* (* D D) h) w))))) #s(literal 0 binary64)))) (+.f64 w w))

derivations267.0ms (2.8%)

Memory
-9.5MiB live, 350.6MiB allocated; 43ms collecting garbage
Stop Event
fuel
Compiler

Compiled 913 to 92 computations (89.9% saved)

preprocess81.0ms (0.8%)

Memory
7.6MiB live, 110.1MiB allocated; 36ms collecting garbage
Remove

(abs M)

(abs d)

(abs D)

Compiler

Compiled 2 950 to 586 computations (80.1% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...