Metrics for Henrywood and Agarwal, Equation (13)

start0.0ms (0%)

Memory: 0.2MiB live, 0.2MiB allocated; 0ms collecting garbage

analyze700.0ms (6.7%)

Memory

24.4MiB live, 1 195.3MiB allocated; 158ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
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)

sample5.6s (53.4%)

Memory

66.8MiB live, 6 232.4MiB allocated; 2.4s collecting garbage

Samples

1.3s	8 293×	0	invalid
827.0ms	1 820×	2	valid
620.0ms	4 262×	0	valid
558.0ms	755×	3	valid
546.0ms	1 419×	1	valid

Precisions

Click to see histograms. Total time spent on operations: 2.9s

ival-mult: 1.6s (54.3% of total)

ival-div: 410.0ms (14% of total)

adjust: 326.0ms (11.2% of total)

ival-sqrt: 271.0ms (9.3% of total)

ival-sub: 156.0ms (5.3% of total)

ival-add: 149.0ms (5.1% of total)

exact: 15.0ms (0.5% of total)

ival-assert: 6.0ms (0.2% of total)

Bogosity

explain402.0ms (3.8%)

Memory

17.5MiB live, 631.7MiB allocated; 55ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
107	0	-	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))))`
75	0	-	1	(2.6061193529818492e+240 -3.2231472499566604e-218 5.6959116322965915e-298 1.7588146828390137e+96 -1.5088858439027633e-139 2.917736931109667e+148)	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`
59	0	-	0	-	`(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	1	(2.6061193529818492e+240 -3.2231472499566604e-218 5.6959116322965915e-298 1.7588146828390137e+96 -1.5088858439027633e-139 2.917736931109667e+148)	4	(2.0113353122862537e+302 3.0585368247915015e-177 1.0248266505380393e-138 1.119435482115927e+67 2.8573974179387678e+184 -2.398711988098087e-196)	`(.f64 (.f64 w h) (*.f64 D D))`
40	0	-	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))`
38	0	-	1	(-6.56097292848089e+98 1.1782033768022084e-150 8.694092226278054e-31 -1.518350840087797e-19 -1.7235773841283546e+106 7.581471382578846e+102)	`(.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)))))`
32	0	-	2	(7.031242432629498e+72 -3.131678526082942e+47 3.2242965743747514e-164 -9.40934907898434e-138 -2.82539548924621e-159 4.461318445567245e-16)	`(.f64 c0 (.f64 d d))`
0	0	-	0	-	`D`
0	0	-	0	-	`(*.f64 M M)`
0	0	-	0	-	`d`
0	0	-	0	-	`(*.f64 d d)`
0	0	-	0	-	`(*.f64 w h)`
0	0	-	0	-	`(*.f64 #s(literal 2 binary64) w)`
0	0	-	0	-	`(*.f64 D D)`
0	0	-	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))))`
0	0	-	0	-	`c0`
0	0	-	0	-	`#s(literal 2 binary64)`
0	0	-	0	-	`(/.f64 c0 (*.f64 #s(literal 2 binary64) w))`
0	0	-	0	-	`w`
0	0	-	0	-	`h`
0	0	-	0	-	`M`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`+.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-rescue	77	0
↳	`(.f64 c0 (.f64 d d))`	overflow	100
↳	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	overflow	144
↳	`(*.f64 D D)`	overflow	21
↳	`(*.f64 d d)`	overflow	95
↳	`(*.f64 w h)`	overflow	21
↳	`(.f64 (.f64 w h) (*.f64 D D))`	overflow	20
↳	`(.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))))`	overflow	199
↳	`(*.f64 M M)`	overflow	40
↳	`(.f64 c0 (.f64 d d))`	overflow	200
↳	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	overflow	288
↳	`(*.f64 D D)`	overflow	42
↳	`(*.f64 w h)`	overflow	42
↳	`(.f64 (.f64 w h) (*.f64 D D))`	overflow	40
↳	`(-.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))`	overflow	199
↳	`(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)))`	overflow	144
↳	`(*.f64 d d)`	overflow	190
`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-rescue	55	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))))`	overflow	199
↳	`(*.f64 M M)`	overflow	40
↳	`(.f64 c0 (.f64 d d))`	overflow	200
↳	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	overflow	288
↳	`(*.f64 D D)`	overflow	42
↳	`(*.f64 w h)`	overflow	42
↳	`(.f64 (.f64 w h) (*.f64 D D))`	overflow	40
↳	`(-.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))`	overflow	199
↳	`(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)))`	overflow	144
↳	`(*.f64 d d)`	overflow	190
`-.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-rescue	40	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))))`	overflow	199
↳	`(.f64 c0 (.f64 d d))`	overflow	200
↳	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	overflow	288
↳	`(*.f64 D D)`	overflow	42
↳	`(*.f64 d d)`	overflow	190
↳	`(*.f64 w h)`	overflow	42
↳	`(.f64 (.f64 w h) (*.f64 D D))`	overflow	40
↳	`(*.f64 M M)`	overflow	40
`+.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))))`	cancellation	30	0
`*.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)))))`	*ou**	19	0
↳	`(/.f64 c0 (*.f64 #s(literal 2 binary64) w))`	overflow	52
↳	`(+.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))))`	underflow	85
↳	`(.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))))`	underflow	4
↳	`(*.f64 M M)`	underflow	88
↳	`(.f64 c0 (.f64 d d))`	underflow	63
↳	`(*.f64 D D)`	underflow	279
↳	`(*.f64 d d)`	underflow	72
↳	`(*.f64 w h)`	underflow	132
↳	`(.f64 (.f64 w h) (*.f64 D D))`	underflow	339
↳	`(-.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))`	underflow	4
`*.f64`	`(.f64 c0 (.f64 d d))`	*no**	18	0
`/.f64`	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	n/u	17	0
↳	`(*.f64 D D)`	underflow	93
↳	`(*.f64 w h)`	underflow	44
↳	`(.f64 (.f64 w h) (*.f64 D D))`	underflow	113
`/.f64`	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	o/n	16	0
↳	`(.f64 c0 (.f64 d d))`	overflow	100
↳	`(*.f64 d d)`	overflow	95
`/.f64`	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	u/u	16	0
↳	`(.f64 c0 (.f64 d d))`	underflow	21
↳	`(*.f64 d d)`	underflow	24
↳	`(*.f64 D D)`	underflow	93
↳	`(*.f64 w h)`	underflow	44
↳	`(.f64 (.f64 w h) (*.f64 D D))`	underflow	113
`/.f64`	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	o/o	14	0
↳	`(.f64 c0 (.f64 d d))`	overflow	100
↳	`(*.f64 d d)`	overflow	95
↳	`(*.f64 D D)`	overflow	21
↳	`(*.f64 w h)`	overflow	21
↳	`(.f64 (.f64 w h) (*.f64 D D))`	overflow	20
`*.f64`	`(.f64 (.f64 w h) (*.f64 D D))`	*no**	12	0
`*.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)))))`	*nu**	11	0
`*.f64`	`(.f64 (.f64 w h) (*.f64 D D))`	*nu**	9	0
`*.f64`	`(.f64 c0 (.f64 d d))`	*nu**	7	0
`*.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)))))`	*no**	7	0
`*.f64`	`(.f64 (.f64 w h) (*.f64 D D))`	*ou**	5	0
↳	`(*.f64 w h)`	overflow	21
↳	`(*.f64 D D)`	underflow	93
`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-rescue	4	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))))`	underflow	4
↳	`(*.f64 M M)`	underflow	88
↳	`(.f64 c0 (.f64 d d))`	underflow	42
↳	`(*.f64 D D)`	underflow	186
↳	`(*.f64 d d)`	underflow	48
↳	`(*.f64 w h)`	underflow	88
↳	`(.f64 (.f64 w h) (*.f64 D D))`	underflow	226
↳	`(-.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))`	underflow	4
`/.f64`	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	u/n	2	0
↳	`(.f64 c0 (.f64 d d))`	underflow	21
↳	`(*.f64 d d)`	underflow	24
`*.f64`	`(.f64 (.f64 w h) (*.f64 D D))`	*uo**	2	0
↳	`(*.f64 w h)`	underflow	44
↳	`(*.f64 D D)`	overflow	21
`/.f64`	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	n/o	2	0
↳	`(*.f64 D D)`	overflow	21
↳	`(*.f64 w h)`	overflow	21
↳	`(.f64 (.f64 w h) (*.f64 D D))`	overflow	20

Confusion

	Predicted +	Predicted -
+	195	4
-	6	51

Precision

0.9701492537313433

Recall

0.9798994974874372

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	195	0	4
-	6	0	51

Precision?

0.9701492537313433

Recall?

0.9798994974874372

Freqs

test

number	freq
0	55
1	89
2	76
3	24
4	10
5	2

Total Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	1	0	0
-	0	0	0

Precision?

1.0

Recall?

1.0

Samples

67.0ms	164×	2	valid
35.0ms	244×	0	valid
22.0ms	38×	3	valid
19.0ms	66×	1	valid

Compiler

Compiled 536 to 67 computations (87.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 99.0ms

ival-mult: 49.0ms (49.5% of total)

adjust: 16.0ms (16.2% of total)

ival-div: 13.0ms (13.1% of total)

ival-sqrt: 11.0ms (11.1% of total)

ival-sub: 5.0ms (5% of total)

ival-add: 5.0ms (5% of total)

ival-true: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

exact: 0.0ms (0% of total)

preprocess212.0ms (2%)

Memory

-20.4MiB live, 153.4MiB allocated; 70ms collecting garbage

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	217	1480
1	1061	1456
2	6147	1456
0	21	52
0	35	52
1	92	52
2	511	52
3	5203	46
0	8142	46

Stop Event

1×	iter limit
1×	node limit
1×	iter limit
1×	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

Status	Accuracy	Program
▶	22.8%	(.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)))))

Status

Accuracy

Program

▶

22.8%

(*.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)

series156.0ms (1.5%)

Memory

1.8MiB live, 194.9MiB allocated; 25ms 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:

Time	Variable		Point	Expression
17.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)))) (/ (* 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)
15.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	@	-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)
12.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)
11.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)

rewrite237.0ms (2.3%)

Memory

17.0MiB live, 200.3MiB allocated; 25ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1056	13977
0	1078	11750
1	6379	11750
0	8039	11750

Stop Event

1×	iter limit
1×	node limit
1×	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)))

eval42.0ms (0.4%)

Memory: -6.5MiB live, 79.1MiB allocated; 17ms collecting garbage
Compiler: Compiled 25 520 to 2 016 computations (92.1% saved)

prune25.0ms (0.2%)

Memory

20.4MiB live, 66.6MiB allocated; 3ms collecting garbage

Pruning

17 alts after pruning (17 fresh and 0 done)

	Pruned	Kept	Total
New	329	17	346
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	330	17	347

Accuracy

44.3%

Counts

347 → 17

Alt Table

Click to see full alt table

Status	Accuracy	Program
	24.2%	(/.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)))
	22.9%	(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 (.f64 D D) 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)))))
	20.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 (/.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)))))
	29.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))) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (*.f64 h w) D) D)))))
▶	20.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 #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)))
	21.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 (/.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))))
▶	31.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 (.f64 h w) D) D))))
	23.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 (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.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)))) (neg.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 h w) D) D))) c0))))
▶	29.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))))) (/.f64 (/.f64 (pow.f64 (.f64 c0 d) #s(literal 2 binary64)) (.f64 D D)) (.f64 (.f64 w w) h)))
	27.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 (+.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))
	19.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))))) (/.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)))
▶	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 (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)))
	2.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 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 h w) D) D))) (.f64 c0 c0)) w) #s(literal -1/2 binary64)))
	2.9%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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)))
	16.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 (.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 536 to 1 174 computations (53.7% saved)

series226.0ms (2.2%)

Memory

-26.7MiB live, 409.1MiB allocated; 63ms collecting garbage

Counts

50 → 180

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
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d 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)))
(/.f64 (/.f64 (pow.f64 (.f64 c0 d) #s(literal 2 binary64)) (.f64 D D)) (.f64 (.f64 w w) h))
(/.f64 (pow.f64 (.f64 c0 d) #s(literal 2 binary64)) (.f64 D D))
(pow.f64 (*.f64 c0 d) #s(literal 2 binary64))
(*.f64 c0 d)
(*.f64 D D)
(.f64 (.f64 w w) h)
(*.f64 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 (/.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 #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))
(/.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)
(+.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)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (*.f64 D D) h))
(.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))
(/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) (.f64 (.f64 d d) c0))
(.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) (.f64 (.f64 w w) h))
(pow.f64 (*.f64 D M) #s(literal 2 binary64))
(*.f64 D M)
#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 (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)))
(/.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))
(+.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 (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 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) (*.f64 d d))
#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 (/ (/ (pow (* c0 d) 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 (* c0 d) 2) (* D D)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (pow D 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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2))))))
#s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #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)))) c0)))
#s(approx (/ (* 2 (* (* d d) c0)) (* (* D D) h)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))))
#s(approx (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2))))))
#s(approx (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2)))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #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)))))
#s(approx (/ (pow (* c0 d) 2) (* (* D D) h)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 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 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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))))
#s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) h)))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 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 (/ (* (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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* -1 (* c0 (+ (* -2 (/ (pow d 2) (* (pow D 2) h))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (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 (* (* w w) h) #s(hole binary64 (* h (pow w 2))))
#s(approx (* w w) #s(hole binary64 (pow w 2)))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #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))))))
#s(approx (* (pow (* D M) 2) (* (* w w) h)) #s(hole binary64 (* (pow D 2) (* (pow M 2) (* h (pow w 2))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* D M) 2) (* (* w w) h)) (* d d)) -1/4) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2)))))
#s(approx (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) #s(hole binary64 (/ (* (pow D 2) (* (pow M 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 (/ (+ (* 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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow w 2) (+ (* -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 (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* (pow w 2) (+ (* -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 (* -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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #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)))) h)))
#s(approx (* (* D D) h) #s(hole binary64 (* (pow D 2) h)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (pow D 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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (pow w 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (pow h 2))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow w 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 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 (/ (+ (* -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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (pow h 2)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (pow w 2))) (* c0 (pow d 2)))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow h 2)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) (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 (/ (+ (* -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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) h))) (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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* 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 D 2))))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h (pow w 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 4) h)))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* (pow D 2) (+ (* -1/4 (/ (* (pow M 2) (* h (pow w 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) 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)) (* (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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) c0)) (* 2 (/ (* c0 (pow d 4)) (* (pow D 2) h)))) (pow d 2))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 2) (* (pow M 2) (* h (pow w 2))))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 2) h))) (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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) h)))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 4))) (/ (pow c0 2) (* (pow D 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/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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h (pow w 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow M 2) h))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) (* h (pow w 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (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))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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:

Time	Variable		Point	Expression
49.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))))) (/ (/ (pow (* c0 d) 2) (* D D)) (* (* w w) h)) (/ (pow (* c0 d) 2) (* D D)) (pow (* c0 d) 2) (* c0 d) (* D D) (* (* w w) h) (* w w) (* (/ c0 (* 2 w)) (+ (/ (* 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)))) (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (* D D) h) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) (* (pow (* D M) 2) (* (* w w) h)) (pow (* D M) 2) (* D M) -1/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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4) (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)
15.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))))) (/ (/ (pow (* c0 d) 2) (* D D)) (* (* w w) h)) (/ (pow (* c0 d) 2) (* D D)) (pow (* c0 d) 2) (* c0 d) (* D D) (* (* w w) h) (* w w) (* (/ c0 (* 2 w)) (+ (/ (* 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)))) (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (* D D) h) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) (* (pow (* D M) 2) (* (* w w) h)) (pow (* D M) 2) (* D M) -1/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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4) (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)
14.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) 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))))) (/ (/ (pow (* c0 d) 2) (* D D)) (* (* w w) h)) (/ (pow (* c0 d) 2) (* D D)) (pow (* c0 d) 2) (* c0 d) (* D D) (* (* w w) h) (* w w) (* (/ c0 (* 2 w)) (+ (/ (* 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)))) (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (* D D) h) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) (* (pow (* D M) 2) (* (* w w) h)) (pow (* D M) 2) (* D M) -1/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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4) (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)
12.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))))) (/ (/ (pow (* c0 d) 2) (* D D)) (* (* w w) h)) (/ (pow (* c0 d) 2) (* D D)) (pow (* c0 d) 2) (* c0 d) (* D D) (* (* w w) h) (* w w) (* (/ c0 (* 2 w)) (+ (/ (* 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)))) (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (* D D) h) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) (* (pow (* D M) 2) (* (* w w) h)) (pow (* D M) 2) (* D M) -1/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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4) (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)
11.0ms	h	@	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))))) (/ (/ (pow (* c0 d) 2) (* D D)) (* (* w w) h)) (/ (pow (* c0 d) 2) (* D D)) (pow (* c0 d) 2) (* c0 d) (* D D) (* (* w w) h) (* w w) (* (/ c0 (* 2 w)) (+ (/ (* 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)))) (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (* D D) h) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) (* (pow (* D M) 2) (* (* w w) h)) (pow (* D M) 2) (* D M) -1/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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4) (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)

rewrite206.0ms (2%)

Memory

33.6MiB live, 268.2MiB allocated; 16ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1184	14865
0	1251	13115
1	6986	13115
0	8002	13115

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Counts

230 → 361

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
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d 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)))
(/.f64 (/.f64 (pow.f64 (.f64 c0 d) #s(literal 2 binary64)) (.f64 D D)) (.f64 (.f64 w w) h))
(/.f64 (pow.f64 (.f64 c0 d) #s(literal 2 binary64)) (.f64 D D))
(pow.f64 (*.f64 c0 d) #s(literal 2 binary64))
(*.f64 c0 d)
(*.f64 D D)
(.f64 (.f64 w w) h)
(*.f64 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 (/.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 #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))
(/.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)
(+.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)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (*.f64 D D) h))
(.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))
(/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) (.f64 (.f64 d d) c0))
(.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) (.f64 (.f64 w w) h))
(pow.f64 (*.f64 D M) #s(literal 2 binary64))
(*.f64 D M)
#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 (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)))
(/.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))
(+.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 (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 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) (*.f64 d d))
#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 (/ (/ (pow (* c0 d) 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 (* c0 d) 2) (* D D)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (pow D 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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2))))))
#s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #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)))) c0)))
#s(approx (/ (* 2 (* (* d d) c0)) (* (* D D) h)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))))
#s(approx (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2))))))
#s(approx (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2)))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #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)))))
#s(approx (/ (pow (* c0 d) 2) (* (* D D) h)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 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 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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))))
#s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) h)))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 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 (/ (* (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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* -1 (* c0 (+ (* -2 (/ (pow d 2) (* (pow D 2) h))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (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 (* (* w w) h) #s(hole binary64 (* h (pow w 2))))
#s(approx (* w w) #s(hole binary64 (pow w 2)))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #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))))))
#s(approx (* (pow (* D M) 2) (* (* w w) h)) #s(hole binary64 (* (pow D 2) (* (pow M 2) (* h (pow w 2))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* D M) 2) (* (* w w) h)) (* d d)) -1/4) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2)))))
#s(approx (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) #s(hole binary64 (/ (* (pow D 2) (* (pow M 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 (/ (+ (* 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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow w 2) (+ (* -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 (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* (pow w 2) (+ (* -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 (* -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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #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)))) h)))
#s(approx (* (* D D) h) #s(hole binary64 (* (pow D 2) h)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (pow D 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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (pow w 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (pow h 2))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow w 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 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 (/ (+ (* -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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (pow h 2)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (pow w 2))) (* c0 (pow d 2)))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow h 2)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) (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 (/ (+ (* -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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) h))) (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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* 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 D 2))))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h (pow w 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 4) h)))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* (pow D 2) (+ (* -1/4 (/ (* (pow M 2) (* h (pow w 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) 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)) (* (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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) c0)) (* 2 (/ (* c0 (pow d 4)) (* (pow D 2) h)))) (pow d 2))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 2) (* (pow M 2) (* h (pow w 2))))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 2) h))) (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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) h)))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 4))) (/ (pow c0 2) (* (pow D 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/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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h (pow w 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow M 2) h))))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) (* h (pow w 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (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))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 #s(approx (+ (/ ( c0 (* d 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 h w) D)) (/.f64 (.f64 (*.f64 d d) c0) D))) (/.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 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 (.f64 (*.f64 d d) c0) 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 #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 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 #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 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)))
(/.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 D D) h) w)))
(/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) w))
(+.f64 (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)))
(.f64 (.f64 #s(literal 2 binary64) c0) (*.f64 d d))
(.f64 (.f64 #s(literal 2 binary64) (*.f64 d d)) c0)
(.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 (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 D D) h) w)
(.f64 (.f64 (*.f64 h w) D) D)
(.f64 (.f64 h w) (*.f64 D D))
(.f64 (.f64 D D) (*.f64 h w))
(.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 #s(approx (+ (/ ( c0 (* 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(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 (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 w #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 (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))
(exp.f64 (*.f64 (log.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
#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 (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 (pow.f64 (.f64 d c0) #s(literal 2 binary64))) (neg.f64 (.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 (/.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 (.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)
(*.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 h (.f64 w w))
(.f64 w (.f64 h 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))))
(.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 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w)) (/.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 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w)))
(/.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 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w))) (*.f64 w #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 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h))))) (neg.f64 w))
(/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w)
(+.f64 (/.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) w) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) w))
(+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) w) (/.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) w))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)))) (.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)))) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))))
(/.f64 (-.f64 (.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))))) (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)))) (-.f64 (.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (*.f64 d d) c0) h))))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)))) (.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (*.f64 w w) h) c0)))))))
(-.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 (neg.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) #s(literal -1/2 binary64)))
(-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h))))
(+.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))))
(+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)))
(.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))
(.f64 (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))
(/.f64 (neg.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64))) (neg.f64 (.f64 (*.f64 D D) h)))
(/.f64 (/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 D D)) h)
(/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (*.f64 D D) h))
(+.f64 (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))
(.f64 (.f64 D D) h)
(.f64 D (.f64 D h))
(.f64 h (.f64 D D))
(.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)))
(.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64))
(/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) #s(literal -1/2 binary64)) (.f64 (*.f64 d d) c0))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h))) (.f64 (*.f64 d d) c0))
(.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (*.f64 d d)))
(.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (*.f64 w w) h) c0))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 w w) h) (.f64 (.f64 d d) c0)))
(.f64 (.f64 D D) (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 (.f64 d d) c0)))
(/.f64 (neg.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h))) (neg.f64 (.f64 (.f64 d d) c0)))
(/.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) c0) (*.f64 d d))
(/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) (.f64 (.f64 d d) c0))
(/.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d)) c0)
(.f64 (.f64 (pow.f64 (.f64 M w) #s(literal 2 binary64)) (.f64 D D)) h)
(.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 D D))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h))
(.f64 (.f64 (.f64 w w) h) (pow.f64 (.f64 M D) #s(literal 2 binary64)))
(.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) (.f64 w 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 (cosh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))))
(*.f64 M D)
(*.f64 D M)
#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 -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h))) (*.f64 w w)))
(/.f64 (/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h))) w) w)
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)))) (neg.f64 (*.f64 w w)))
(/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h))) (*.f64 w w))
(+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (.f64 w w)) (/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (.f64 w w)))
(+.f64 (/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (.f64 w w)) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (.f64 w w)))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))))) (-.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d)))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d)))) (.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)))) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h))) (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d)))) (.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (*.f64 w w) h) d)))))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d)))) (-.f64 (.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (*.f64 D D) h))))))
(-.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (.f64 (neg.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) #s(literal -1/4 binary64)))
(+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)))
(+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))))
(.f64 (/.f64 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) h))
(.f64 (.f64 c0 c0) (/.f64 (.f64 d d) (.f64 (*.f64 D D) h)))
(/.f64 (neg.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64))) (neg.f64 (.f64 (*.f64 D D) h)))
(/.f64 (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D) h)
(/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (*.f64 D D) h))
(.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (*.f64 w w) h) d)))
(.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (*.f64 w w) h) d)) #s(literal -1/4 binary64))
(/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) #s(literal -1/4 binary64)) (.f64 d d))
(.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 w w) h) (*.f64 d d)))
(.f64 (.f64 D D) (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (*.f64 d d)))
(/.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) d) d)
(/.f64 (neg.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h))) (neg.f64 (*.f64 d d)))
(/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) (*.f64 d d))
#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 (/.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 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 (.f64 (+.f64 (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) 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 (+ (/ (* c0 (* d d)) (* (* 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 D D) h) 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 (* (* d d) c0)) (.f64 (.f64 (*.f64 d d) c0) #s(literal 2 binary64)))
#s(approx (* (* d d) c0) (.f64 (.f64 d d) c0))
#s(approx (/ (/ (pow (* c0 d) 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 (* c0 d) 2) (* D D)) (/.f64 (/.f64 (pow.f64 (*.f64 d c0) #s(literal 2 binary64)) D) D))
#s(approx (pow (* c0 d) 2) (pow.f64 (*.f64 d c0) #s(literal 2 binary64)))
#s(approx (* c0 d) (*.f64 d c0))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (pow.f64 (.f64 d c0) #s(literal 2 binary64))) (.f64 (.f64 (.f64 D D) h) w)) (.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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))))
#s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/.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)) d) (/.f64 (.f64 (*.f64 w w) h) d)) #s(literal -1/2 binary64))) c0))
#s(approx (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)))
#s(approx (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))))
#s(approx (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (*.f64 w w) h) c0)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.f64 d d)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.f64 d d)) (/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #s(literal 2 binary64))) h)))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (*.f64 w w) h) d))))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h))))
#s(approx (/ (pow (* c0 d) 2) (* (* D D) h)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (*.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 (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 c0 c0) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (pow.f64 (.f64 d c0) #s(literal 2 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 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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)) (* (* 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 h w) D)) (/.f64 (.f64 (*.f64 d d) c0) 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 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 D D) h) 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)))) (.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 D D) h) 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)))) (.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 D D) h) w)))) c0))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 (.f64 (*.f64 d d) c0) D)))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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 D D) h) w))) c0))
#s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)))
#s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) (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) h))) c0))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #s(literal 2 binary64))) h))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (+.f64 (.f64 (.f64 c0 c0) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (pow.f64 (.f64 d c0) #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #s(literal 2 binary64))) h)))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (*.f64 D D) h)))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) (pow.f64 (.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64)) (/.f64 (.f64 d d) (.f64 (.f64 D D) h))) (*.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 D D) h) w))) (.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 D D) h) w))) w) #s(literal -1/2 binary64)) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (pow.f64 (.f64 d c0) #s(literal 2 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 D D) h) w))) w) #s(literal -1/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 (.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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 D D) h) w))) 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 #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 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (pow.f64 (.f64 d c0) #s(literal 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)))) (neg.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) 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 (.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 d) (.f64 (.f64 (.f64 D D) h) w))) (neg.f64 (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) 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 d) (.f64 (.f64 (.f64 D D) h) 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 d) (.f64 (.f64 (.f64 D D) h) 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 d) (.f64 (.f64 (.f64 D D) h) 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 d) (.f64 (.f64 (.f64 D D) h) 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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (neg.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 d d)) (.f64 (.f64 (.f64 D D) h) 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))) c0)))
#s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (neg.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 d d)) (.f64 (.f64 D D) h)) (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) (pow.f64 (*.f64 d c0) #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 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (/.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 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.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 (* 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 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -2 binary64) (.f64 (/.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 (/.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 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) 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 #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 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (*.f64 d d) c0) h))) w))
#s(approx (* (* (* h w) D) D) (.f64 (.f64 (*.f64 D D) h) w))
#s(approx (* (* h w) D) (.f64 (.f64 h w) D))
#s(approx (* h w) (*.f64 h w))
#s(approx (* (* w w) h) (.f64 (.f64 w w) h))
#s(approx (* w w) (*.f64 w w))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w))
#s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))))
#s(approx (* (pow (* D M) 2) (* (* w w) h)) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (*.f64 w w) h) d))))
#s(approx (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) 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 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) 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 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) 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 (/.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 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) 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 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 (.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 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)) (.f64 (sqrt.f64 #s(literal -1 binary64)) M)))))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.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)))) (.f64 w w)))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.f64 d d)) (/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #s(literal 2 binary64))) 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))))) (neg.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) 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 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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 #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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 #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)) (* (* 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 M D) #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 #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 (.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 #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 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 D D) w))) h))
#s(approx h h)
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (/.f64 (+.f64 (/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 D D) w)) (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 h h) w)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) h))
#s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/.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))) h))
#s(approx (* (* D D) h) (.f64 (.f64 D D) h))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.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 (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (/.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (pow.f64 (.f64 h w) #s(literal 2 binary64))) (.f64 d d)) #s(literal -1/4 binary64)) (/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) 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 #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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.f64 (+.f64 (.f64 (/.f64 (.f64 (.f64 d d) c0) (.f64 (pow.f64 (.f64 D h) #s(literal 2 binary64)) w)) #s(literal 2 binary64)) (/.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 (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M w) #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 h) #s(literal 2 binary64)))) h))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (/.f64 (/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) D) D) (pow.f64 (.f64 h w) #s(literal 2 binary64))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) (.f64 d d))) h))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D h) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (.f64 M w) #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 (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 (* 2 w)) (+ (/ (* c0 (* 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 (/.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 (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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (neg.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 d d) c0) (.f64 (pow.f64 (.f64 D h) #s(literal 2 binary64)) w)) #s(literal -2 binary64)) (/.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 (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (neg.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 d d) c0)) (pow.f64 (.f64 D h) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (.f64 M w) #s(literal 2 binary64)) (.f64 D D)) (.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) h)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (neg.f64 (.f64 (-.f64 (neg.f64 (/.f64 (/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) D) D) (pow.f64 (.f64 h w) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) (.f64 d d))) h)))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (neg.f64 (.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D h) #s(literal 2 binary64)))) (.f64 (/.f64 (.f64 (pow.f64 (.f64 M w) #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 (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 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 (/.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 (+ (/ (* c0 (* d d)) (* (* 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 (.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 (* D D) (*.f64 D D))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (/.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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w 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) h))) (.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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.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 (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (/.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) h) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (pow.f64 D #s(literal 4 binary64))) (.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (+.f64 (/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (pow.f64 D #s(literal 4 binary64)) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #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))) (.f64 D D)))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (pow.f64 D #s(literal 4 binary64)) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.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 (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 #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 (+ (/ (* c0 (* d d)) (* (* 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 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 (/.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 (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (/.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 D D) h) w)))) (.f64 d d)))
#s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) 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)) h)))) (*.f64 d d)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (+.f64 (.f64 (/.f64 (.f64 c0 c0) (.f64 D D)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (.f64 (.f64 w w) h))) (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64))) (*.f64 d d)))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (/.f64 (+.f64 (/.f64 (.f64 (.f64 c0 c0) (pow.f64 d #s(literal 4 binary64))) (.f64 (.f64 D D) h)) (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) #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 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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)) (* (* 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 D D) h) w)) (.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 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 M D) #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 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 (/.f64 c0 (.f64 D D)) (.f64 h w))))) (.f64 d d)))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.f64 (+.f64 (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 D D) h) w)) (.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 d d)))
#s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w 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 D) h)))) (*.f64 d d)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (.f64 (+.f64 (/.f64 (.f64 c0 c0) (.f64 (.f64 D D) h)) (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) (pow.f64 d #s(literal 4 binary64))) #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 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.f64 d d)) (/.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 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)) (* (* 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 D D) h) w) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (.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)) (* (* 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 D D) h) w) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (.f64 M M)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 (.f64 (*.f64 d d) c0) D))))
#s(approx (* (sqrt -1) M) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx M M)
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (+.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 (* 2 w)) (+ (/ (* c0 (* d 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 (.f64 d d) c0) (.f64 D D)) (.f64 (.f64 h w) 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)))) (.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 (+ (/ (* c0 (* d d)) (* (* 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 (.f64 d d) c0) (.f64 D D)) (.f64 (.f64 h w) M)))) M))
#s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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 (.f64 (.f64 (.f64 D D) h) w) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (.f64 M M)))
#s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (+.f64 (/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 D D) h) (.f64 w w)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (.f64 M M)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 D D) h)) (.f64 d d))) (*.f64 M M)))
#s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 D D) h) (.f64 w w)) (.f64 d d)) #s(literal -1/4 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 (/.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))))) (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 (.f64 d d) c0) (.f64 D D)) (.f64 (.f64 h w) 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 (.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 d d) c0) (.f64 (.f64 (*.f64 D D) h) w))) 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 D D) h) w))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))

eval64.0ms (0.6%)

Memory: -28.3MiB live, 113.3MiB allocated; 16ms collecting garbage
Compiler: Compiled 52 944 to 2 841 computations (94.6% saved)

prune58.0ms (0.6%)

Memory

33.5MiB live, 127.5MiB allocated; 5ms collecting garbage

Pruning

32 alts after pruning (32 fresh and 0 done)

	Pruned	Kept	Total
New	561	27	588
Fresh	7	5	12
Picked	5	0	5
Done	0	0	0
Total	573	32	605

Accuracy

76.2%

Counts

605 → 32

Alt Table

Click to see full alt table

Status	Accuracy	Program
	34.8%	(/.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 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 (.f64 (.f64 d d) c0) D)))) (.f64 w #s(literal 2 binary64)))
	31.3%	(.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)))
	20.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 (/.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)))))
	29.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))) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (*.f64 h w) D) D)))))
	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 d d) c0) #s(literal 2 binary64)) (.f64 (*.f64 h w) D)) D)))
	19.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 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w)))
▶	21.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 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d c0) 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)))
	30.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 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) w))))
▶	33.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 (.f64 d d) c0)) (.f64 (.f64 h (.f64 w D)) D))))
	29.4%	(.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 w) (.f64 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 #s(literal 2 binary64) (.f64 (.f64 d c0) d)) (.f64 (.f64 (.f64 h w) D) D))))
	21.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 #s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/.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)) d) (/.f64 (.f64 (*.f64 w w) h) d)) #s(literal -1/2 binary64))) c0)) w)))
	29.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 #s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))) w)))
	19.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 #s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)))) w)))
	23.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 (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)))
	3.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)))) (neg.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 h w) D) D))) c0))))
	2.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)))) (neg.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) c0))))
	25.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)))) #s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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)))))
	12.4%	(.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)))) #s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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)))))
	30.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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 w w))))
▶	40.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 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #s(literal 2 binary64))) h))
	13.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 (/.f64 (pow.f64 (.f64 c0 d) #s(literal 2 binary64)) (.f64 D D)) (.f64 (exp.f64 (.f64 (log.f64 w) #s(literal 2 binary64))) h)))
	35.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 d c0) #s(literal 2 binary64)) D) D) (.f64 (*.f64 w w) h)))
	21.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))))) (/.f64 (/.f64 (.f64 (.f64 d d) (.f64 c0 c0)) (.f64 D D)) (.f64 (.f64 w w) h)))
	29.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))))) (/.f64 (/.f64 (.f64 (.f64 d c0) (.f64 d c0)) (.f64 D D)) (.f64 (.f64 w w) h)))
	29.9%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h))) (.f64 w w)))
	15.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 #s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d)))) (.f64 w w)))
	2.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 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) (.f64 c0 c0)) w) #s(literal -1/2 binary64)))
	2.9%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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)))
	21.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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 w w)))))
▶	31.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.f64 d d))))

Compiler

Compiled 5 190 to 2 314 computations (55.4% saved)

series266.0ms (2.5%)

Memory

17.1MiB live, 369.7MiB allocated; 85ms collecting garbage

Counts

57 → 222

Calls

Call 1

Inputs
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d 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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #s(literal 2 binary64))) h)
(/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #s(literal 2 binary64)))
(pow.f64 (*.f64 d c0) #s(literal 2 binary64))
(*.f64 d c0)
d
c0
#s(literal 2 binary64)
(pow.f64 (*.f64 D w) #s(literal 2 binary64))
(*.f64 D w)
D
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 (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 (.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 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 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 h (.f64 w D)) D)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 h (.f64 w D)) D))
(.f64 #s(literal 2 binary64) (.f64 (*.f64 d d) c0))
(.f64 (.f64 d d) c0)
(*.f64 d d)
(.f64 (.f64 h (*.f64 w D)) D)
(.f64 h (.f64 w D))
(*.f64 w 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.f64 d d))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.f64 d d)))
(/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.f64 d d))
(.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h)
(pow.f64 (*.f64 M D) #s(literal 2 binary64))
(*.f64 M D)
#s(literal -1/4 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 c0) 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 (+ (/ (* c0 (* d d)) (* (* 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 c0) 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))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d c0) 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)
(+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d c0) 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)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d c0) d)) (.f64 (*.f64 D D) h))
(.f64 #s(literal 2 binary64) (.f64 (*.f64 d c0) d))
(.f64 (.f64 d c0) d)
(.f64 (.f64 D D) h)
(*.f64 D D)
(.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))
(/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) (.f64 (.f64 d d) c0))
(.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) (.f64 (.f64 w w) h))
(pow.f64 (*.f64 D M) #s(literal 2 binary64))
(*.f64 D M)
(.f64 (.f64 w w) h)
(*.f64 w w)
#s(literal -1/2 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 (/ (/ (pow (* d c0) 2) (pow (* D w) 2)) h) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (pow (* d c0) 2) (pow (* D w) 2)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 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 (* (/ 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)) (* (* 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 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2))))))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #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)))) c0)))
#s(approx (/ (* 2 (* (* d c0) d)) (* (* D D) h)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))))
#s(approx (* 2 (* (* d c0) d)) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* d c0) d) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2))))))
#s(approx (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 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 (/ (* (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 (+ 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)) (* (* 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 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 (/ (* (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 (+ 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)) (* (* w 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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* -1 (* c0 (+ (* -2 (/ (pow d 2) (* (pow D 2) h))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (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 (pow (* D w) 2) #s(hole binary64 (* (pow D 2) (pow w 2))))
#s(approx (* D w) #s(hole binary64 (* D w)))
#s(approx w #s(hole binary64 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)) (* (* w 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 (* 2 w) #s(hole binary64 (* 2 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 (* w D) #s(hole binary64 (* D w)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #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))))))
#s(approx (* (pow (* D M) 2) (* (* w w) h)) #s(hole binary64 (* (pow D 2) (* (pow M 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 (+ 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)) (* (* w 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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow w 2) (+ (* -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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (+ 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)) (* (* w 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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 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)) (* (* w 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* M D) 2) h) -1/4) (* d d)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (* (* (pow (* M D) 2) h) -1/4) #s(hole binary64 (* -1/4 (* (pow D 2) (* (pow M 2) h)))))
#s(approx (* (pow (* M D) 2) h) #s(hole binary64 (* (pow D 2) (* (pow M 2) h))))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #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)))) h)))
#s(approx (* (* D D) h) #s(hole binary64 (* (pow D 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 (+ 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (pow w 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 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 (/ (+ (* -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 (+ 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)) (* (* w 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (pow h 2)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (pow w 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 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 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)) (* (* w 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* M D) 2) #s(hole binary64 (* (pow D 2) (pow M 2))))
#s(approx (* M D) #s(hole binary64 (* D M)))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) h))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h (pow w 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 4) 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)) (* (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 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)) (* (* 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) c0)) (* 2 (/ (* c0 (pow d 4)) (* (pow D 2) h)))) (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 (+ 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)) (* (* 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 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/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 (+ 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 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (+ 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)) (* (* 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h (pow w 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (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))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (+ 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)) (* (* w 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:

Time	Variable		Point	Expression
56.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))))) (/ (/ (pow (* d c0) 2) (pow (* D w) 2)) h) (/ (pow (* d c0) 2) (pow (* D w) 2)) (pow (* d c0) 2) (* d c0) d c0 2 (pow (* D w) 2) (* D w) D w h (* (/ 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 (* 2 w)) (+ (/ (* 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)))) (/ (* 2 (* (* d d) c0)) (* (* h (* w D)) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) (* (* h (* w D)) D) (* h (* w D)) (* w 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (pow (* M D) 2) h) -1/4) (* d d)) (* (* (pow (* M D) 2) h) -1/4) (* (pow (* M D) 2) h) (pow (* M D) 2) (* M D) -1/4 (* (/ c0 (* 2 w)) (+ (/ (* 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)))) (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* 2 (* (* d c0) d)) (* (* d c0) d) (* (* D D) h) (* D D) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) (* (pow (* D M) 2) (* (* w w) h)) (pow (* D M) 2) (* D M) (* (* w w) h) (* w w) -1/2)
36.0ms	M	@	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))))) (/ (/ (pow (* d c0) 2) (pow (* D w) 2)) h) (/ (pow (* d c0) 2) (pow (* D w) 2)) (pow (* d c0) 2) (* d c0) d c0 2 (pow (* D w) 2) (* D w) D w h (* (/ 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 (* 2 w)) (+ (/ (* 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)))) (/ (* 2 (* (* d d) c0)) (* (* h (* w D)) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) (* (* h (* w D)) D) (* h (* w D)) (* w 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (pow (* M D) 2) h) -1/4) (* d d)) (* (* (pow (* M D) 2) h) -1/4) (* (pow (* M D) 2) h) (pow (* M D) 2) (* M D) -1/4 (* (/ c0 (* 2 w)) (+ (/ (* 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)))) (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* 2 (* (* d c0) d)) (* (* d c0) d) (* (* D D) h) (* D D) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) (* (pow (* D M) 2) (* (* w w) h)) (pow (* D M) 2) (* D M) (* (* w w) h) (* w w) -1/2)
20.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))))) (/ (/ (pow (* d c0) 2) (pow (* D w) 2)) h) (/ (pow (* d c0) 2) (pow (* D w) 2)) (pow (* d c0) 2) (* d c0) d c0 2 (pow (* D w) 2) (* D w) D w h (* (/ 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 (* 2 w)) (+ (/ (* 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)))) (/ (* 2 (* (* d d) c0)) (* (* h (* w D)) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) (* (* h (* w D)) D) (* h (* w D)) (* w 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (pow (* M D) 2) h) -1/4) (* d d)) (* (* (pow (* M D) 2) h) -1/4) (* (pow (* M D) 2) h) (pow (* M D) 2) (* M D) -1/4 (* (/ c0 (* 2 w)) (+ (/ (* 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)))) (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* 2 (* (* d c0) d)) (* (* d c0) d) (* (* D D) h) (* D D) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) (* (pow (* D M) 2) (* (* w w) h)) (pow (* D M) 2) (* D M) (* (* w w) h) (* w w) -1/2)
14.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))))) (/ (/ (pow (* d c0) 2) (pow (* D w) 2)) h) (/ (pow (* d c0) 2) (pow (* D w) 2)) (pow (* d c0) 2) (* d c0) d c0 2 (pow (* D w) 2) (* D w) D w h (* (/ 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 (* 2 w)) (+ (/ (* 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)))) (/ (* 2 (* (* d d) c0)) (* (* h (* w D)) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) (* (* h (* w D)) D) (* h (* w D)) (* w 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (pow (* M D) 2) h) -1/4) (* d d)) (* (* (pow (* M D) 2) h) -1/4) (* (pow (* M D) 2) h) (pow (* M D) 2) (* M D) -1/4 (* (/ c0 (* 2 w)) (+ (/ (* 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)))) (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* 2 (* (* d c0) d)) (* (* d c0) d) (* (* D D) h) (* D D) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) (* (pow (* D M) 2) (* (* w w) h)) (pow (* D M) 2) (* D M) (* (* w w) h) (* w w) -1/2)
14.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))))) (/ (/ (pow (* d c0) 2) (pow (* D w) 2)) h) (/ (pow (* d c0) 2) (pow (* D w) 2)) (pow (* d c0) 2) (* d c0) d c0 2 (pow (* D w) 2) (* D w) D w h (* (/ 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 (* 2 w)) (+ (/ (* 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)))) (/ (* 2 (* (* d d) c0)) (* (* h (* w D)) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) (* (* h (* w D)) D) (* h (* w D)) (* w 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (pow (* M D) 2) h) -1/4) (* d d)) (* (* (pow (* M D) 2) h) -1/4) (* (pow (* M D) 2) h) (pow (* M D) 2) (* M D) -1/4 (* (/ c0 (* 2 w)) (+ (/ (* 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)))) (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* 2 (* (* d c0) d)) (* (* d c0) d) (* (* D D) h) (* D D) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) (* (pow (* D M) 2) (* (* w w) h)) (pow (* D M) 2) (* D M) (* (* w w) h) (* w w) -1/2)

rewrite310.0ms (3%)

Memory

12.3MiB live, 250.9MiB allocated; 110ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1205	19383
0	1273	16926
1	6842	16926
0	8544	16926

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Counts

279 → 431

Calls

Call 1

Inputs
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d 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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #s(literal 2 binary64))) h)
(/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #s(literal 2 binary64)))
(pow.f64 (*.f64 d c0) #s(literal 2 binary64))
(*.f64 d c0)
d
c0
#s(literal 2 binary64)
(pow.f64 (*.f64 D w) #s(literal 2 binary64))
(*.f64 D w)
D
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 (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 (.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 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 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 h (.f64 w D)) D)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 h (.f64 w D)) D))
(.f64 #s(literal 2 binary64) (.f64 (*.f64 d d) c0))
(.f64 (.f64 d d) c0)
(*.f64 d d)
(.f64 (.f64 h (*.f64 w D)) D)
(.f64 h (.f64 w D))
(*.f64 w 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.f64 d d))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.f64 d d)))
(/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.f64 d d))
(.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h)
(pow.f64 (*.f64 M D) #s(literal 2 binary64))
(*.f64 M D)
#s(literal -1/4 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 c0) 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 (+ (/ (* c0 (* d d)) (* (* 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 c0) 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))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d c0) 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)
(+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d c0) 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)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d c0) d)) (.f64 (*.f64 D D) h))
(.f64 #s(literal 2 binary64) (.f64 (*.f64 d c0) d))
(.f64 (.f64 d c0) d)
(.f64 (.f64 D D) h)
(*.f64 D D)
(.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))
(/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) (.f64 (.f64 w w) h)) (.f64 (.f64 d d) c0))
(.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) (.f64 (.f64 w w) h))
(pow.f64 (*.f64 D M) #s(literal 2 binary64))
(*.f64 D M)
(.f64 (.f64 w w) h)
(*.f64 w 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))))) #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 (/ (/ (pow (* d c0) 2) (pow (* D w) 2)) h) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (pow (* d c0) 2) (pow (* D w) 2)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 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 (* (/ 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)) (* (* 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 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2))))))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #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)))) c0)))
#s(approx (/ (* 2 (* (* d c0) d)) (* (* D D) h)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))))
#s(approx (* 2 (* (* d c0) d)) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* d c0) d) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2))))))
#s(approx (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 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 (/ (* (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 (+ 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)) (* (* 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 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 (/ (* (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 (+ 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)) (* (* w 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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* -1 (* c0 (+ (* -2 (/ (pow d 2) (* (pow D 2) h))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (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 (pow (* D w) 2) #s(hole binary64 (* (pow D 2) (pow w 2))))
#s(approx (* D w) #s(hole binary64 (* D w)))
#s(approx w #s(hole binary64 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)) (* (* w 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 (* 2 w) #s(hole binary64 (* 2 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 (* w D) #s(hole binary64 (* D w)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #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))))))
#s(approx (* (pow (* D M) 2) (* (* w w) h)) #s(hole binary64 (* (pow D 2) (* (pow M 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 (+ 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)) (* (* w 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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow w 2) (+ (* -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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (+ 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)) (* (* w 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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 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)) (* (* w 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* M D) 2) h) -1/4) (* d d)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (* (* (pow (* M D) 2) h) -1/4) #s(hole binary64 (* -1/4 (* (pow D 2) (* (pow M 2) h)))))
#s(approx (* (pow (* M D) 2) h) #s(hole binary64 (* (pow D 2) (* (pow M 2) h))))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #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)))) h)))
#s(approx (* (* D D) h) #s(hole binary64 (* (pow D 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 (+ 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (pow w 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 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 (/ (+ (* -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 (+ 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)) (* (* w 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (pow h 2)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (pow w 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 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 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)) (* (* w 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* M D) 2) #s(hole binary64 (* (pow D 2) (pow M 2))))
#s(approx (* M D) #s(hole binary64 (* D M)))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) h))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h (pow w 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 4) 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)) (* (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 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)) (* (* 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) c0)) (* 2 (/ (* c0 (pow d 4)) (* (pow D 2) h)))) (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 (+ 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)) (* (* 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 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/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 (+ 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 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (+ 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)) (* (* 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) #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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h (pow w 2))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (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))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (+ 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)) (* (* w 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
#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))))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (pow.f64 (*.f64 D w) #s(literal 2 binary64)) h)))
(/.f64 (neg.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #s(literal 2 binary64)))) (neg.f64 h))
(/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #s(literal 2 binary64))) h)
(/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (pow.f64 (*.f64 D w) #s(literal 2 binary64)) h))
(.f64 (/.f64 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (*.f64 w w)))
(.f64 (.f64 c0 c0) (/.f64 (.f64 d d) (pow.f64 (.f64 D w) #s(literal 2 binary64))))
(/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 D D)) (*.f64 w w))
(/.f64 (neg.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64))) (neg.f64 (pow.f64 (.f64 D w) #s(literal 2 binary64))))
(/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #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
#s(literal 2 binary64)
(.f64 (pow.f64 (.f64 D w) #s(literal 1 binary64)) (pow.f64 (*.f64 D w) #s(literal 1 binary64)))
(.f64 (.f64 D w) (*.f64 D w))
(.f64 (.f64 w w) (*.f64 D D))
(.f64 (.f64 D D) (*.f64 w w))
(pow.f64 (*.f64 D w) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 D w)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (.f64 D w)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 D w)) #s(literal 2 binary64))))
(*.f64 D w)
(*.f64 w D)
D
w
h
(.f64 (/.f64 c0 (.f64 w #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 (sqrt.f64 #s(literal -1 binary64)) M)))
(.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 (sqrt.f64 #s(literal -1 binary64)) M)) (/.f64 c0 (.f64 w #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 (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 (+ (/ (* c0 (* 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)
(*.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))
(exp.f64 (*.f64 (log.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
#s(literal -1 binary64)
M
(.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 #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 (.f64 w #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 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 (.f64 (*.f64 d d) c0) 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 #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)))
(*.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)) (* (* 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 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 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)))
(/.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 D D) h) w)))
(/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) w))
(+.f64 (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)))
(.f64 (.f64 #s(literal 2 binary64) c0) (*.f64 d d))
(.f64 (.f64 #s(literal 2 binary64) (*.f64 d d)) c0)
(.f64 (.f64 #s(literal 2 binary64) (*.f64 d c0)) 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 (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 (*.f64 D D) h) w)
(.f64 (.f64 (*.f64 h w) D) D)
(.f64 (.f64 h w) (*.f64 D D))
(.f64 (.f64 D D) (*.f64 h w))
(.f64 D (.f64 (*.f64 h w) D))
(.f64 h (.f64 (*.f64 D w) D))
(.f64 w (.f64 (*.f64 D D) h))
(.f64 (.f64 D h) w)
(.f64 (.f64 h w) D)
(.f64 (.f64 D w) h)
(.f64 D (.f64 h w))
(.f64 h (.f64 D w))
(*.f64 D w)
(*.f64 w 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d)))
(.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d))
(.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) (.f64 d d)) #s(literal -1/4 binary64))
(.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) (/.f64 #s(literal -1/4 binary64) (.f64 d d)))
(.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) (.f64 d d)))
(/.f64 (/.f64 (.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) d) d)
(/.f64 (neg.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64))) (neg.f64 (.f64 d d)))
(/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.f64 d d))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 D D)) (.f64 (*.f64 M M) h))
(.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64))
(.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (*.f64 h #s(literal -1/4 binary64)))
(.f64 (.f64 (.f64 M M) h) (.f64 D D))
(.f64 (.f64 D D) (.f64 (.f64 M M) h))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h)
(.f64 h (pow.f64 (.f64 M D) #s(literal 2 binary64)))
(.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 D D) (*.f64 M M))
(.f64 (.f64 M D) (*.f64 M D))
(pow.f64 (*.f64 M D) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))))
(*.f64 M D)
(*.f64 D M)
#s(literal -1/4 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 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w)) (/.f64 c0 (*.f64 w #s(literal 2 binary64))))
(.f64 (/.f64 c0 (.f64 w #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 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w)))
(/.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 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w))) (*.f64 w #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 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h))))) (neg.f64 w))
(/.f64 (-.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w)
(+.f64 (/.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) w) (/.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) w))
(+.f64 (/.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) w) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) w))
(/.f64 (-.f64 (.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))) (.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)))) (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64))) (.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)))) (-.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) #s(literal 3 binary64)) (.f64 (pow.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal 3 binary64)) #s(literal -1/8 binary64))) (+.f64 (.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))) (-.f64 (.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64))) (.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (*.f64 w w) h) c0)) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 (.f64 (pow.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal 3 binary64)) #s(literal -1/8 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64))) (-.f64 (.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))) (.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (*.f64 d d) c0) h))))))
(-.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 (neg.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) #s(literal -1/2 binary64)))
(-.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h))))
(+.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)) (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)))
(+.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)))
(.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))
(.f64 (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))
(/.f64 (neg.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64))) (neg.f64 (.f64 (*.f64 D D) h)))
(/.f64 (/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 D D)) h)
(/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (*.f64 D D) h))
(+.f64 (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))
(.f64 (.f64 #s(literal 2 binary64) c0) (*.f64 d d))
(.f64 (.f64 #s(literal 2 binary64) (*.f64 d d)) c0)
(.f64 (.f64 #s(literal 2 binary64) (*.f64 d c0)) 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) 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 (cosh.f64 (.f64 (log.f64 D) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 D) #s(literal 2 binary64))))
(.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64))
(.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)))
(/.f64 (.f64 (.f64 (.f64 (.f64 w w) h) (pow.f64 (.f64 M D) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (*.f64 d d) c0))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 w w) h) (pow.f64 (.f64 M D) #s(literal 2 binary64)))) (.f64 (*.f64 d d) c0))
(.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (*.f64 d d)))
(.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (*.f64 w w) h) c0))
(.f64 (.f64 D D) (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 (.f64 d d) c0)))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 w w) h) (.f64 (.f64 d d) c0)))
(/.f64 (neg.f64 (.f64 (.f64 (.f64 w w) h) (pow.f64 (.f64 M D) #s(literal 2 binary64)))) (neg.f64 (.f64 (.f64 d d) c0)))
(/.f64 (/.f64 (.f64 (.f64 (.f64 w w) h) (pow.f64 (.f64 M D) #s(literal 2 binary64))) c0) (*.f64 d d))
(/.f64 (.f64 (.f64 (.f64 w w) h) (pow.f64 (.f64 M D) #s(literal 2 binary64))) (.f64 (.f64 d d) c0))
(/.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d)) c0)
(.f64 (.f64 (pow.f64 (.f64 M w) #s(literal 2 binary64)) (.f64 D D)) h)
(.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 D D))
(.f64 (.f64 (.f64 w w) h) (pow.f64 (.f64 M D) #s(literal 2 binary64)))
(.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) (.f64 w w)))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 w w) h))
(.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 D D) (*.f64 M M))
(.f64 (.f64 M D) (*.f64 M D))
(pow.f64 (*.f64 M D) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))))
(*.f64 M D)
(*.f64 D M)
(.f64 (.f64 w w) h)
(.f64 h (.f64 w w))
(.f64 w (.f64 h 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(literal -1/2 binary64)
#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))))) (.f64 (/.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#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))))) (.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 (+ 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))))) (.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 (+ 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))))) (.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 (/ (/ (pow (* d c0) 2) (pow (* D w) 2)) h) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 w w))))
#s(approx (/ (pow (* d c0) 2) (pow (* D w) 2)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #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 (+ 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))))) (.f64 (/.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#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))))) (.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 (+ 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))))) (.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 (+ 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))))) (.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 (+ w 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 (.f64 d d) c0) (.f64 (.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 (.f64 (+.f64 (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) 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 (+ (/ (* c0 (* d d)) (* (* 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 D D) h) w))) c0) (.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ c0 (+ w w)) (*.f64 (/.f64 c0 w) #s(literal 1/2 binary64)))
#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 (* (* d c0) d)) (.f64 (.f64 (*.f64 d d) c0) #s(literal 2 binary64)))
#s(approx (* (* d c0) d) (.f64 (.f64 d d) c0))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (.f64 w w)))))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (pow.f64 (.f64 d c0) #s(literal 2 binary64))) (.f64 (.f64 (.f64 D D) h) w)) (.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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (pow.f64 (.f64 d c0) #s(literal 2 binary64))) (.f64 (.f64 D D) h)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (*.f64 w w) h) d)))) c0))
#s(approx (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)))
#s(approx (* 2 (* (* d c0) d)) (.f64 (.f64 (*.f64 d d) c0) #s(literal 2 binary64)))
#s(approx (* (* d c0) d) (.f64 (.f64 d d) c0))
#s(approx (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2) (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)))
#s(approx (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (*.f64 w w) h) c0)))
#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))))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 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))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (+ 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))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (+ 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))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (+ 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))))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 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))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (+ 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))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (+ 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))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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)) (* (* 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 h w) D)) (/.f64 (.f64 (*.f64 d d) c0) 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 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 D D) h) 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)))) (.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 D D) h) 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)))) (.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 D D) h) w)))) c0))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 (.f64 (*.f64 d d) c0) D)))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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 D D) h) w))) c0))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h)))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 w w) h) (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) h))) c0))
#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))))) (.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) (.f64 c0 c0)) w) #s(literal -1/2 binary64)))
#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))))) (.f64 (-.f64 (.f64 (/.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) w) #s(literal -1/2 binary64)) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (pow.f64 (.f64 d c0) #s(literal 2 binary64)))) (.f64 c0 c0)))
#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))))) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) w) #s(literal -1/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 (.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 (+ 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))))) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) 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 #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 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (pow.f64 (.f64 d c0) #s(literal 2 binary64))))) (*.f64 c0 c0)))
#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))))) (.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) (.f64 c0 c0)) w) #s(literal -1/2 binary64)))
#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))))) (.f64 (-.f64 (.f64 (/.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) w) #s(literal -1/2 binary64)) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (pow.f64 (.f64 d c0) #s(literal 2 binary64)))) (.f64 c0 c0)))
#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))))) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) w) #s(literal -1/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 (.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 (+ 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))))) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) 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 #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 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (pow.f64 (.f64 d c0) #s(literal 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)))) (neg.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) 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 (.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 d) (.f64 (.f64 (.f64 D D) h) w))) (neg.f64 (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) 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 d) (.f64 (.f64 (.f64 D D) h) 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 d) (.f64 (.f64 (.f64 D D) h) 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 d) (.f64 (.f64 (.f64 D D) h) 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 d) (.f64 (.f64 (.f64 D D) h) 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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (neg.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 d d)) (.f64 (.f64 (.f64 D D) h) 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))) c0)))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (neg.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 d d)) (.f64 (.f64 D D) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 w w) h) (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 (+ 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))))) (/.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d)))) (*.f64 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))))) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) 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 (+ 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))))) (/.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 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d))) (.f64 w w)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h))) (.f64 w w)))
#s(approx (pow (* D w) 2) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))
#s(approx (* D w) (*.f64 D w))
#s(approx 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))))) (/.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d)))) (*.f64 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))))) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) 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 (+ 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))))) (/.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 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) 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 w) (*.f64 w #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 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.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 (/.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 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) 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 #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 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (*.f64 d d) c0) h))) w))
#s(approx (+ w w) (*.f64 w #s(literal 2 binary64)))
#s(approx (* (* h (* w D)) D) (.f64 (.f64 (*.f64 D D) h) w))
#s(approx (* h (* w D)) (.f64 (.f64 h w) D))
#s(approx (* D w) (*.f64 D w))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d)))) (*.f64 w w)))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (/.f64 (-.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (-.f64 (.f64 (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))))
#s(approx (* (pow (* D M) 2) (* (* w w) h)) (.f64 (.f64 (.f64 w w) h) (pow.f64 (.f64 M D) #s(literal 2 binary64))))
#s(approx (* (* w w) h) (.f64 (.f64 w w) h))
#s(approx (* w w) (*.f64 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))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 D D) 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))))) (/.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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 D D) 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))))) (/.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 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) 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))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 D D) 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))))) (/.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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 D D) 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))))) (/.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 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) 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 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 (.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 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)) (.f64 (sqrt.f64 #s(literal -1 binary64)) M)))))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.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)))) (.f64 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))))) (neg.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 D D) 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))))) (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 (+ 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))))) (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 (+ 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))))) (neg.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 D D) 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))))) (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 (+ 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))))) (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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (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 (* (/ 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))))) (/.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M h) #s(literal 2 binary64)) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 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))))) (/.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 (+ 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))))) (/.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 h 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))))) (/.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M h) #s(literal 2 binary64)) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 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))))) (/.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 (+ 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))))) (/.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)) (* (* 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 M D) #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 #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 (.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 #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 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 D D) w))) h))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M h) #s(literal 2 binary64)) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (/ (* (* (pow (* M D) 2) h) -1/4) (* d d)) (.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d)))
#s(approx (* (* (pow (* M D) 2) h) -1/4) (.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)))
#s(approx (* (pow (* M D) 2) h) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (/.f64 (+.f64 (/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 D D) w)) (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 (.f64 h h) w)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) h))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/.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))) h))
#s(approx (* (* D D) h) (.f64 (.f64 D D) 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))))) (.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 (+ 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))))) (+.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 (+ 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))))) (+.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 (+ 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))))) (.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 (+ 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))))) (+.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 (+ 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))))) (+.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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 h w) #s(literal 2 binary64)) (.f64 D D))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) (.f64 d d))) h))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.f64 (+.f64 (.f64 (/.f64 (.f64 (.f64 d d) c0) (.f64 (pow.f64 (.f64 D h) #s(literal 2 binary64)) w)) #s(literal 2 binary64)) (/.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 (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M w) #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 h) #s(literal 2 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))))) (-.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 (+ 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))))) (-.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 (+ 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))))) (-.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 (+ 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))))) (-.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)) (* (* 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (neg.f64 (.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 h w) #s(literal 2 binary64)) (.f64 D D)))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) (.f64 d d))) h)))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (neg.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 d d) c0) (.f64 (pow.f64 (.f64 D h) #s(literal 2 binary64)) w)) #s(literal -2 binary64)) (/.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 (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (neg.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 d d) c0)) (pow.f64 (.f64 D h) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (.f64 M w) #s(literal 2 binary64)) (.f64 D D)) (.f64 (*.f64 d d) c0)) #s(literal -1/2 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))))) (/.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 (+ 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))))) (/.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 (+ 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))))) (/.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)
#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))))) (/.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 (+ 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))))) (/.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 (+ 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))))) (/.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 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 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.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 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 h w))) (.f64 D D)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.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 (pow (* D M) 2) (pow.f64 (*.f64 M D) #s(literal 2 binary64)))
#s(approx (* D M) (*.f64 M D))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (/.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 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w 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) h))) (.f64 D D)))
#s(approx (* D D) (*.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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #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))) (.f64 D D)))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 M M) h) w)) (.f64 (.f64 d d) c0))) (*.f64 D D)))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (+.f64 (/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (pow.f64 D #s(literal 4 binary64)) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D 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))))) (+.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 (+ 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))))) (+.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)
#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))))) (+.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 (+ 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))))) (+.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 #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 (+ (/ (* c0 (* d d)) (* (* 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 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 (/.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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (+.f64 (.f64 (/.f64 (.f64 c0 c0) (.f64 D D)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (.f64 (.f64 w w) h))) (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64))) (*.f64 d d)))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 d #s(literal 4 binary64)) c0)) (.f64 (.f64 (.f64 D D) h) w)) (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h w)) c0) #s(literal -1/2 binary64))) (.f64 d d)))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 w w) h) (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)) h)))) (*.f64 d 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))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (+ 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))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (+ 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))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (+ 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))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (+ 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))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (+ 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))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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)) (* (* 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 D D) h) w)) (.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 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 M D) #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 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 (/.f64 c0 (.f64 D D)) (.f64 h w))))) (.f64 d d)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (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 (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.f64 (+.f64 (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 D D) h) w)) (.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 d d)))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 w w) h) (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) h)))) (*.f64 d 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))))) (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (.f64 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))))) (+.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 (+ 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))))) (+.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 (+ 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))))) (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (.f64 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))))) (+.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 (+ 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))))) (+.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)) (* (* 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 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)) (* (* 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 D D) h) w) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (.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)) (* (* 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 D D) h) w) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (.f64 M M)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 (.f64 (*.f64 d d) c0) D))))
#s(approx (* (sqrt -1) M) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx M M)
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (+.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 (+ 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))))) (.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 (+ 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))))) (.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 (+ 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))))) (.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 (+ 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))))) (.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 (+ 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))))) (.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 (+ 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))))) (.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)) (* (* 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) (.f64 D D)) (.f64 (.f64 h w) 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)))) (.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 (+ (/ (* c0 (* d d)) (* (* 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 (.f64 d d) c0) (.f64 D D)) (.f64 (.f64 h w) M)))) M))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 w w) h) (pow.f64 (.f64 M D) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 D D) h)) (.f64 d d))) (*.f64 M M)))
#s(approx (/ (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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 (.f64 (.f64 (.f64 D D) h) w) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (.f64 M M)))
#s(approx (+ (/ (* 2 (* (* d c0) d)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (+.f64 (/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 D D) h) (.f64 w w)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (.f64 M 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))))) (.f64 (/.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64)))
#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))))) (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 (+ 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))))) (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 (+ 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))))) (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 (+ 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))))) (.f64 (/.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64)))
#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))))) (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 (+ 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))))) (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 (+ 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))))) (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)) (* (* 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 (.f64 d d) c0) (.f64 D D)) (.f64 (.f64 h w) 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 (.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 d d) c0) (.f64 (.f64 (*.f64 D D) h) w))) 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 D D) h) w))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))

eval56.0ms (0.5%)

Memory: -39.1MiB live, 108.6MiB allocated; 17ms collecting garbage
Compiler: Compiled 40 398 to 2 412 computations (94% saved)

prune85.0ms (0.8%)

Memory

31.1MiB live, 131.8MiB allocated; 40ms collecting garbage

Pruning

35 alts after pruning (34 fresh and 1 done)

	Pruned	Kept	Total
New	425	18	443
Fresh	11	16	27
Picked	4	1	5
Done	0	0	0
Total	440	35	475

Accuracy

76.3%

Counts

475 → 35

Alt Table

Click to see full alt table

Status	Accuracy	Program
	34.8%	(/.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 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 (.f64 (.f64 d d) c0) D)))) (.f64 w #s(literal 2 binary64)))
	31.3%	(.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))))
	22.9%	(.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 (.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 D D) h) w))) c0)))
✓	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)))
	19.1%	(.f64 (/.f64 c0 (.f64 w #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 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w)))
	20.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 (/.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)))))
	29.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))) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (*.f64 h w) D) D)))))
	21.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 #s(literal 2 binary64) (.f64 (.f64 d c0) d)) (.f64 (.f64 D D) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 D D)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) w)))
	36.4%	(.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 #s(literal 2 binary64) (.f64 d c0)) d) (.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 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) 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 (exp.f64 (.f64 (log.f64 d) #s(literal 2 binary64))) c0)) (.f64 (.f64 h (.f64 w D)) D))))
	21.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 #s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/.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)) d) (/.f64 (.f64 (*.f64 w w) h) d)) #s(literal -1/2 binary64))) c0)) w)))
	29.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 #s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))) w)))
	19.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 #s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)))) w)))
	23.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 (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)))
	3.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)))) (neg.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 h w) D) D))) c0))))
	25.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)))) #s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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)))))
	12.4%	(.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)))) #s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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)))))
	37.6%	#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))))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (pow.f64 (*.f64 D w) #s(literal 2 binary64)) h)))
	30.0%	#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))))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 w w))))
	2.3%	#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))))) (.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) (.f64 c0 c0)) w) #s(literal -1/2 binary64)))
▶	33.3%	#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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d))))
▶	40.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 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D w) (.f64 D w))) h))
	13.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 (/.f64 (pow.f64 (.f64 c0 d) #s(literal 2 binary64)) (.f64 D D)) (.f64 (exp.f64 (.f64 (log.f64 w) #s(literal 2 binary64))) h)))
	29.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))))) (/.f64 (/.f64 (.f64 (.f64 d c0) (.f64 d c0)) (.f64 D D)) (.f64 (.f64 w w) h)))
	22.9%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 D D)) (/.f64 (.f64 d d) (*.f64 w w))) h))
	28.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))))) (/.f64 (.f64 (.f64 c0 c0) (/.f64 (.f64 d d) (pow.f64 (.f64 D w) #s(literal 2 binary64)))) h))
	15.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 #s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d)))) (.f64 w w)))
	2.9%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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)))
	21.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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 w w)))))
	12.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (+.f64 (cosh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64)))) h) #s(literal -1/4 binary64)) (*.f64 d d))))
	29.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) (.f64 D D)) h) #s(literal -1/4 binary64)) (.f64 d d))))
	28.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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 D D)) #s(literal -1/4 binary64)) (.f64 d d))))
▶	31.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #s(literal -1/4 binary64)) (.f64 d d))))
▶	31.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) h) #s(literal -1/4 binary64)) (*.f64 d d))))

Compiler

Compiled 5 879 to 2 620 computations (55.4% saved)

series300.0ms (2.9%)

Memory

-2.5MiB live, 420.2MiB allocated; 38ms collecting garbage

Counts

47 → 193

Calls

Call 1

Inputs
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d 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)) (.f64 (.f64 D w) (.f64 D w))) h))
(/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D w) (.f64 D w))) h)
(/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D w) (.f64 D w)))
(pow.f64 (*.f64 d c0) #s(literal 2 binary64))
(*.f64 d c0)
d
c0
#s(literal 2 binary64)
(.f64 (.f64 D w) (*.f64 D w))
(*.f64 D w)
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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #s(literal -1/4 binary64)) (.f64 d d))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #s(literal -1/4 binary64)) (.f64 d d)))
(/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #s(literal -1/4 binary64)) (.f64 d d))
(.f64 (.f64 (.f64 (.f64 M D) (*.f64 M D)) h) #s(literal -1/4 binary64))
(.f64 (.f64 (.f64 M D) (.f64 M D)) h)
(.f64 (.f64 M D) (*.f64 M D))
(*.f64 M D)
M
#s(literal -1/4 binary64)
(*.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 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) D)))))
(/.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 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) D))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) D)))
(.f64 #s(literal 2 binary64) (.f64 (*.f64 d d) c0))
(.f64 (.f64 d d) c0)
(.f64 h (.f64 (*.f64 D w) D))
(.f64 (.f64 D w) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d)))
(.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d))
(/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) d)
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h)
(pow.f64 (*.f64 M D) #s(literal 2 binary64))
(/.f64 #s(literal -1/4 binary64) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) h) #s(literal -1/4 binary64)) (*.f64 d d))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) h) #s(literal -1/4 binary64)) (*.f64 d d)))
(/.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) h) #s(literal -1/4 binary64)) (*.f64 d d))
(.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) h) #s(literal -1/4 binary64))
(.f64 (exp.f64 (.f64 (log.f64 (*.f64 M D)) #s(literal 2 binary64))) h)
(exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64)))
(.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))
(log.f64 (*.f64 M D))

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 (/ (/ (pow (* d c0) 2) (* (* D w) (* D 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 w) (* D w))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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)) #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 (/ (* 2 (* (* d d) c0)) (* h (* (* D w) 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 (+ 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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)) (* (* 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (* (* D w) (* D w)) #s(hole binary64 (* (pow D 2) (pow w 2))))
#s(approx (* D w) #s(hole binary64 (* D w)))
#s(approx w #s(hole binary64 w))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* 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 (* h (* (* D w) D)) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* D w) D) #s(hole binary64 (* (pow D 2) 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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 h #s(hole binary64 h))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (* (* (* (* M D) (* M D)) h) -1/4) (* d d)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (* (* (* (* M D) (* M D)) h) -1/4) #s(hole binary64 (* -1/4 (* (pow D 2) (* (pow M 2) h)))))
#s(approx (* (* (* M D) (* M D)) h) #s(hole binary64 (* (pow D 2) (* (pow M 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 (+ 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 (* (/ (* (pow (* M D) 2) h) d) (/ -1/4 d)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (* (pow (* M D) 2) h) d) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) h)) d)))
#s(approx (* (pow (* M D) 2) h) #s(hole binary64 (* (pow D 2) (* (pow M 2) h))))
#s(approx (/ (* (* (exp (* (log (* M D)) 2)) h) -1/4) (* d d)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (* (* (exp (* (log (* M D)) 2)) h) -1/4) #s(hole binary64 (* -1/4 (* (pow D 2) (* (pow M 2) h)))))
#s(approx (* (exp (* (log (* M D)) 2)) h) #s(hole binary64 (* (pow D 2) (* (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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* (/ 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (+ (/ (* c0 (* d d)) (* (* w 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 D #s(hole binary64 D))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* (* M D) (* M D)) #s(hole binary64 (* (pow D 2) (pow M 2))))
#s(approx (* M D) #s(hole binary64 (* D 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/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 (* (/ 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 (pow (* M D) 2) #s(hole binary64 (* (pow D 2) (pow M 2))))
#s(approx (exp (* (log (* M D)) 2)) #s(hole binary64 (* (pow D 2) (pow M 2))))
#s(approx (* (log (* M D)) 2) #s(hole binary64 (* 2 (+ (log D) (log M)))))
#s(approx (log (* M D)) #s(hole binary64 (+ (log D) (log M))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* (log (* M D)) 2) #s(hole binary64 (* 2 (+ (log M) (* -1 (log (/ 1 D)))))))
#s(approx (log (* M D)) #s(hole binary64 (+ (log M) (* -1 (log (/ 1 D))))))
#s(approx (* (log (* M D)) 2) #s(hole binary64 (* 2 (+ (log (* -1 M)) (* -1 (log (/ -1 D)))))))
#s(approx (log (* M D)) #s(hole binary64 (+ (log (* -1 M)) (* -1 (log (/ -1 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 (+ (* 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 d #s(hole binary64 d))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* d d) #s(hole binary64 (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 (+ (* 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 (* (/ 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 (/ -1/4 d) #s(hole binary64 (/ -1/4 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 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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)) (* (* 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 M #s(hole 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)))) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (+ (/ (* c0 (* d d)) (* (* 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 (* (log (* M D)) 2) #s(hole binary64 (* 2 (+ (log D) (* -1 (log (/ 1 M)))))))
#s(approx (log (* M D)) #s(hole binary64 (+ (log D) (* -1 (log (/ 1 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)))))))
#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 (* (log (* M D)) 2) #s(hole binary64 (* 2 (+ (log (* -1 D)) (* -1 (log (/ -1 M)))))))
#s(approx (log (* M D)) #s(hole binary64 (+ (log (* -1 D)) (* -1 (log (/ -1 M))))))

Calls

18 calls:

Time	Variable		Point	Expression
59.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))))) (/ (/ (pow (* d c0) 2) (* (* D w) (* D w))) h) (/ (pow (* d c0) 2) (* (* D w) (* D w))) (pow (* d c0) 2) (* d c0) d c0 2 (* (* D w) (* D w)) (* D w) D w h (* (/ c0 (* 2 w)) (+ (/ (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (* (* M D) (* M D)) h) -1/4) (* d d)) (* (* (* (* M D) (* M D)) h) -1/4) (* (* (* M D) (* M D)) h) (* (* M D) (* M D)) (* M D) M -1/4 (* 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 (* 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 (* (* D w) D))) (* 2 (* (* d d) c0)) (* (* d d) c0) (* h (* (* D w) D)) (* (* D w) 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (* (/ (* (pow (* M D) 2) h) d) (/ -1/4 d)) (/ (* (pow (* M D) 2) h) d) (* (pow (* M D) 2) h) (pow (* M D) 2) (/ -1/4 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (exp (* (log (* M D)) 2)) h) -1/4) (* d d)) (* (* (exp (* (log (* M D)) 2)) h) -1/4) (* (exp (* (log (* M D)) 2)) h) (exp (* (log (* M D)) 2)) (* (log (* M D)) 2) (log (* M D)))
58.0ms	M	@	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))))) (/ (/ (pow (* d c0) 2) (* (* D w) (* D w))) h) (/ (pow (* d c0) 2) (* (* D w) (* D w))) (pow (* d c0) 2) (* d c0) d c0 2 (* (* D w) (* D w)) (* D w) D w h (* (/ c0 (* 2 w)) (+ (/ (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (* (* M D) (* M D)) h) -1/4) (* d d)) (* (* (* (* M D) (* M D)) h) -1/4) (* (* (* M D) (* M D)) h) (* (* M D) (* M D)) (* M D) M -1/4 (* 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 (* 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 (* (* D w) D))) (* 2 (* (* d d) c0)) (* (* d d) c0) (* h (* (* D w) D)) (* (* D w) 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (* (/ (* (pow (* M D) 2) h) d) (/ -1/4 d)) (/ (* (pow (* M D) 2) h) d) (* (pow (* M D) 2) h) (pow (* M D) 2) (/ -1/4 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (exp (* (log (* M D)) 2)) h) -1/4) (* d d)) (* (* (exp (* (log (* M D)) 2)) h) -1/4) (* (exp (* (log (* M D)) 2)) h) (exp (* (log (* M D)) 2)) (* (log (* M D)) 2) (log (* M D)))
25.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))))) (/ (/ (pow (* d c0) 2) (* (* D w) (* D w))) h) (/ (pow (* d c0) 2) (* (* D w) (* D w))) (pow (* d c0) 2) (* d c0) d c0 2 (* (* D w) (* D w)) (* D w) D w h (* (/ c0 (* 2 w)) (+ (/ (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (* (* M D) (* M D)) h) -1/4) (* d d)) (* (* (* (* M D) (* M D)) h) -1/4) (* (* (* M D) (* M D)) h) (* (* M D) (* M D)) (* M D) M -1/4 (* 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 (* 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 (* (* D w) D))) (* 2 (* (* d d) c0)) (* (* d d) c0) (* h (* (* D w) D)) (* (* D w) 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (* (/ (* (pow (* M D) 2) h) d) (/ -1/4 d)) (/ (* (pow (* M D) 2) h) d) (* (pow (* M D) 2) h) (pow (* M D) 2) (/ -1/4 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (exp (* (log (* M D)) 2)) h) -1/4) (* d d)) (* (* (exp (* (log (* M D)) 2)) h) -1/4) (* (exp (* (log (* M D)) 2)) h) (exp (* (log (* M D)) 2)) (* (log (* M D)) 2) (log (* M D)))
24.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))))) (/ (/ (pow (* d c0) 2) (* (* D w) (* D w))) h) (/ (pow (* d c0) 2) (* (* D w) (* D w))) (pow (* d c0) 2) (* d c0) d c0 2 (* (* D w) (* D w)) (* D w) D w h (* (/ c0 (* 2 w)) (+ (/ (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (* (* M D) (* M D)) h) -1/4) (* d d)) (* (* (* (* M D) (* M D)) h) -1/4) (* (* (* M D) (* M D)) h) (* (* M D) (* M D)) (* M D) M -1/4 (* 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 (* 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 (* (* D w) D))) (* 2 (* (* d d) c0)) (* (* d d) c0) (* h (* (* D w) D)) (* (* D w) 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (* (/ (* (pow (* M D) 2) h) d) (/ -1/4 d)) (/ (* (pow (* M D) 2) h) d) (* (pow (* M D) 2) h) (pow (* M D) 2) (/ -1/4 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (exp (* (log (* M D)) 2)) h) -1/4) (* d d)) (* (* (exp (* (log (* M D)) 2)) h) -1/4) (* (exp (* (log (* M D)) 2)) h) (exp (* (log (* M D)) 2)) (* (log (* M D)) 2) (log (* M D)))
21.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))))) (/ (/ (pow (* d c0) 2) (* (* D w) (* D w))) h) (/ (pow (* d c0) 2) (* (* D w) (* D w))) (pow (* d c0) 2) (* d c0) d c0 2 (* (* D w) (* D w)) (* D w) D w h (* (/ c0 (* 2 w)) (+ (/ (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (* (* M D) (* M D)) h) -1/4) (* d d)) (* (* (* (* M D) (* M D)) h) -1/4) (* (* (* M D) (* M D)) h) (* (* M D) (* M D)) (* M D) M -1/4 (* 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 (* 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 (* (* D w) D))) (* 2 (* (* d d) c0)) (* (* d d) c0) (* h (* (* D w) D)) (* (* D w) 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (* (/ (* (pow (* M D) 2) h) d) (/ -1/4 d)) (/ (* (pow (* M D) 2) h) d) (* (pow (* M D) 2) h) (pow (* M D) 2) (/ -1/4 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))))) (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/ (* (* (exp (* (log (* M D)) 2)) h) -1/4) (* d d)) (* (* (exp (* (log (* M D)) 2)) h) -1/4) (* (exp (* (log (* M D)) 2)) h) (exp (* (log (* M D)) 2)) (* (log (* M D)) 2) (log (* M D)))

rewrite243.0ms (2.3%)

Memory

-5.3MiB live, 270.0MiB allocated; 27ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1085	17210
0	1142	14773
1	6115	14770
0	8063	14770

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Counts

240 → 412

Calls

Call 1

Inputs
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d 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)) (.f64 (.f64 D w) (.f64 D w))) h))
(/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D w) (.f64 D w))) h)
(/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D w) (.f64 D w)))
(pow.f64 (*.f64 d c0) #s(literal 2 binary64))
(*.f64 d c0)
d
c0
#s(literal 2 binary64)
(.f64 (.f64 D w) (*.f64 D w))
(*.f64 D w)
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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #s(literal -1/4 binary64)) (.f64 d d))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #s(literal -1/4 binary64)) (.f64 d d)))
(/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #s(literal -1/4 binary64)) (.f64 d d))
(.f64 (.f64 (.f64 (.f64 M D) (*.f64 M D)) h) #s(literal -1/4 binary64))
(.f64 (.f64 (.f64 M D) (.f64 M D)) h)
(.f64 (.f64 M D) (*.f64 M D))
(*.f64 M D)
M
#s(literal -1/4 binary64)
(*.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 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) D)))))
(/.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 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) D))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) D)))
(.f64 #s(literal 2 binary64) (.f64 (*.f64 d d) c0))
(.f64 (.f64 d d) c0)
(.f64 h (.f64 (*.f64 D w) D))
(.f64 (.f64 D w) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d)))
(.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d))
(/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) d)
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h)
(pow.f64 (*.f64 M D) #s(literal 2 binary64))
(/.f64 #s(literal -1/4 binary64) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) h) #s(literal -1/4 binary64)) (*.f64 d d))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) h) #s(literal -1/4 binary64)) (*.f64 d d)))
(/.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) h) #s(literal -1/4 binary64)) (*.f64 d d))
(.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) h) #s(literal -1/4 binary64))
(.f64 (exp.f64 (.f64 (log.f64 (*.f64 M D)) #s(literal 2 binary64))) h)
(exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64)))
(.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))
(log.f64 (*.f64 M 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 (* 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 (/ (/ (pow (* d c0) 2) (* (* D w) (* D 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 w) (* D w))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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)) #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 (/ (* 2 (* (* d d) c0)) (* h (* (* D w) 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 (+ 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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)) (* (* 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (* (* D w) (* D w)) #s(hole binary64 (* (pow D 2) (pow w 2))))
#s(approx (* D w) #s(hole binary64 (* D w)))
#s(approx w #s(hole binary64 w))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* 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 (* h (* (* D w) D)) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* D w) D) #s(hole binary64 (* (pow D 2) 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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 h #s(hole binary64 h))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (/ (* (* (* (* M D) (* M D)) h) -1/4) (* d d)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (* (* (* (* M D) (* M D)) h) -1/4) #s(hole binary64 (* -1/4 (* (pow D 2) (* (pow M 2) h)))))
#s(approx (* (* (* M D) (* M D)) h) #s(hole binary64 (* (pow D 2) (* (pow M 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 (+ 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 (* (/ (* (pow (* M D) 2) h) d) (/ -1/4 d)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (* (pow (* M D) 2) h) d) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) h)) d)))
#s(approx (* (pow (* M D) 2) h) #s(hole binary64 (* (pow D 2) (* (pow M 2) h))))
#s(approx (/ (* (* (exp (* (log (* M D)) 2)) h) -1/4) (* d d)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (* (* (exp (* (log (* M D)) 2)) h) -1/4) #s(hole binary64 (* -1/4 (* (pow D 2) (* (pow M 2) h)))))
#s(approx (* (exp (* (log (* M D)) 2)) h) #s(hole binary64 (* (pow D 2) (* (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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* (/ 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (+ (/ (* c0 (* d d)) (* (* w 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 D #s(hole binary64 D))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* (* M D) (* M D)) #s(hole binary64 (* (pow D 2) (pow M 2))))
#s(approx (* M D) #s(hole binary64 (* D 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/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 (* (/ 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 (pow (* M D) 2) #s(hole binary64 (* (pow D 2) (pow M 2))))
#s(approx (exp (* (log (* M D)) 2)) #s(hole binary64 (* (pow D 2) (pow M 2))))
#s(approx (* (log (* M D)) 2) #s(hole binary64 (* 2 (+ (log D) (log M)))))
#s(approx (log (* M D)) #s(hole binary64 (+ (log D) (log M))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* (log (* M D)) 2) #s(hole binary64 (* 2 (+ (log M) (* -1 (log (/ 1 D)))))))
#s(approx (log (* M D)) #s(hole binary64 (+ (log M) (* -1 (log (/ 1 D))))))
#s(approx (* (log (* M D)) 2) #s(hole binary64 (* 2 (+ (log (* -1 M)) (* -1 (log (/ -1 D)))))))
#s(approx (log (* M D)) #s(hole binary64 (+ (log (* -1 M)) (* -1 (log (/ -1 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 (+ (* 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 d #s(hole binary64 d))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (* d d) #s(hole binary64 (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 (+ (* 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 (* (/ 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 (/ -1/4 d) #s(hole binary64 (/ -1/4 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 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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)) (* (* 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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 M #s(hole 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)))) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) #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 (+ (/ (* c0 (* d d)) (* (* 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 (* (log (* M D)) 2) #s(hole binary64 (* 2 (+ (log D) (* -1 (log (/ 1 M)))))))
#s(approx (log (* M D)) #s(hole binary64 (+ (log D) (* -1 (log (/ 1 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)))))))
#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 (* (log (* M D)) 2) #s(hole binary64 (* 2 (+ (log (* -1 D)) (* -1 (log (/ -1 M)))))))
#s(approx (log (* M D)) #s(hole binary64 (+ (log (* -1 D)) (* -1 (log (/ -1 M))))))

Outputs
#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))))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (pow.f64 (*.f64 D w) #s(literal 2 binary64)) h)))
(/.f64 (neg.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #s(literal 2 binary64)))) (neg.f64 h))
(/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #s(literal 2 binary64))) h)
(/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (pow.f64 (*.f64 D w) #s(literal 2 binary64)) h))
(.f64 (/.f64 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (*.f64 w w)))
(.f64 (.f64 c0 c0) (/.f64 (.f64 d d) (pow.f64 (.f64 D w) #s(literal 2 binary64))))
(/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 D w)) (*.f64 D w))
(/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 D D)) (*.f64 w w))
(/.f64 (neg.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64))) (neg.f64 (pow.f64 (.f64 D w) #s(literal 2 binary64))))
(/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #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 (pow.f64 (*.f64 d c0) #s(literal 1 binary64)) #s(literal 2 binary64))
(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
#s(literal 2 binary64)
(.f64 (pow.f64 (.f64 D w) #s(literal 1 binary64)) (pow.f64 (*.f64 D w) #s(literal 1 binary64)))
(.f64 (neg.f64 (.f64 D w)) (neg.f64 (*.f64 D w)))
(.f64 (fabs.f64 (.f64 D w)) (fabs.f64 (*.f64 D w)))
(.f64 (.f64 (*.f64 D w) D) w)
(.f64 (.f64 D w) (*.f64 D w))
(.f64 (.f64 w w) (*.f64 D D))
(.f64 (.f64 D D) (*.f64 w w))
(.f64 D (.f64 w (*.f64 D w)))
(pow.f64 (neg.f64 (*.f64 D w)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (*.f64 D w)) #s(literal 2 binary64))
(pow.f64 (*.f64 D w) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 D w)) #s(literal 2 binary64)))
(*.f64 D w)
(*.f64 w D)
D
w
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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d))))
(.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)))
(.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)) (/.f64 #s(literal -1/4 binary64) d))
(.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) (.f64 d d)) #s(literal -1/4 binary64))
(.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) (/.f64 #s(literal -1/4 binary64) (.f64 d d)))
(.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) (.f64 d d)))
(/.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (*.f64 h #s(literal -1/4 binary64))) d) d)
(/.f64 (.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) (/.f64 #s(literal -1/4 binary64) d)) d)
(/.f64 (.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)) #s(literal -1/4 binary64)) d)
(/.f64 (neg.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64)))) (neg.f64 (.f64 d d)))
(/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64))) (.f64 d d))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 D D)) (.f64 (*.f64 M M) h))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (*.f64 h #s(literal -1/4 binary64)))
(.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64))
(.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h))
(.f64 (.f64 M D) (.f64 (.f64 M D) h))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h)
(.f64 (.f64 (.f64 M M) h) (.f64 D D))
(.f64 (.f64 D D) (.f64 (.f64 M M) h))
(.f64 h (pow.f64 (.f64 M D) #s(literal 2 binary64)))
(.f64 (pow.f64 (exp.f64 (log.f64 (.f64 M D))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (*.f64 M D))) #s(literal 1 binary64)))
(.f64 (.f64 (*.f64 M D) M) D)
(.f64 (pow.f64 (.f64 M D) #s(literal 1 binary64)) (pow.f64 (*.f64 M D) #s(literal 1 binary64)))
(.f64 (neg.f64 (.f64 M D)) (neg.f64 (*.f64 M D)))
(.f64 (fabs.f64 (.f64 M D)) (fabs.f64 (*.f64 M D)))
(.f64 (exp.f64 (log.f64 (.f64 M D))) (exp.f64 (log.f64 (*.f64 M D))))
(.f64 (.f64 M D) (*.f64 M D))
(.f64 (.f64 M M) (*.f64 D D))
(.f64 (.f64 D D) (*.f64 M M))
(.f64 M (.f64 D (*.f64 M D)))
(pow.f64 (pow.f64 (*.f64 M D) #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (*.f64 M D)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (*.f64 M D)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 M D))) #s(literal 2 binary64))
(pow.f64 (*.f64 M D) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (exp.f64 (log.f64 (.f64 M D)))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))))
(*.f64 M D)
(*.f64 D M)
M
#s(literal -1/4 binary64)
(*.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 (pow.f64 d #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (neg.f64 d) #s(literal 2 binary64))
(pow.f64 (fabs.f64 d) #s(literal 2 binary64))
(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 #s(approx (+ (/ ( c0 (* d d)) (* (* 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)) h) (.f64 (.f64 D w) D))) (/.f64 c0 (.f64 w #s(literal 2 binary64))))
(.f64 (/.f64 c0 (.f64 w #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 d d) c0) #s(literal 2 binary64)) h) (.f64 (*.f64 D w) 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 (.f64 d d) c0) #s(literal 2 binary64)) h) (.f64 (.f64 D w) 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)))
(*.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)) (* (* 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)) h) (.f64 (*.f64 D w) D)))
(.f64 (/.f64 #s(literal 2 binary64) h) (/.f64 (.f64 (.f64 d d) c0) (.f64 (*.f64 D w) D)))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D w) D) h)))
(/.f64 (/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) h) (.f64 (*.f64 D w) D))
(/.f64 (neg.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64))) (neg.f64 (.f64 (.f64 (.f64 D w) D) h)))
(/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D w) D) h))
(.f64 (.f64 #s(literal 2 binary64) (*.f64 d 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 h (*.f64 D w)) D)
(.f64 (.f64 (*.f64 D w) D) h)
(.f64 h (.f64 (*.f64 D w) D))
(.f64 (.f64 D w) D)
(.f64 D (.f64 D 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d))))
(.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)))
(.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)) (/.f64 #s(literal -1/4 binary64) d))
(.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) (.f64 d d)) #s(literal -1/4 binary64))
(.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) (/.f64 #s(literal -1/4 binary64) (.f64 d d)))
(.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) (.f64 d d)))
(/.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (*.f64 h #s(literal -1/4 binary64))) d) d)
(/.f64 (.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) (/.f64 #s(literal -1/4 binary64) d)) d)
(/.f64 (.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)) #s(literal -1/4 binary64)) d)
(/.f64 (neg.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64)))) (neg.f64 (.f64 d d)))
(/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64))) (.f64 d d))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 h d))
(.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) h) d))
(/.f64 (neg.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h)) (neg.f64 d))
(/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) d)
(.f64 (.f64 M D) (.f64 (.f64 M D) h))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h)
(.f64 (.f64 (.f64 M M) h) (.f64 D D))
(.f64 (.f64 D D) (.f64 (.f64 M M) h))
(.f64 h (pow.f64 (.f64 M D) #s(literal 2 binary64)))
(.f64 (pow.f64 (exp.f64 (log.f64 (.f64 M D))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (*.f64 M D))) #s(literal 1 binary64)))
(.f64 (.f64 (*.f64 M D) M) D)
(.f64 (pow.f64 (.f64 M D) #s(literal 1 binary64)) (pow.f64 (*.f64 M D) #s(literal 1 binary64)))
(.f64 (neg.f64 (.f64 M D)) (neg.f64 (*.f64 M D)))
(.f64 (fabs.f64 (.f64 M D)) (fabs.f64 (*.f64 M D)))
(.f64 (exp.f64 (log.f64 (.f64 M D))) (exp.f64 (log.f64 (*.f64 M D))))
(.f64 (.f64 M D) (*.f64 M D))
(.f64 (.f64 M M) (*.f64 D D))
(.f64 (.f64 D D) (*.f64 M M))
(.f64 M (.f64 D (*.f64 M D)))
(pow.f64 (pow.f64 (*.f64 M D) #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (*.f64 M D)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (*.f64 M D)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 M D))) #s(literal 2 binary64))
(pow.f64 (*.f64 M D) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (exp.f64 (log.f64 (.f64 M D)))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))))
(/.f64 #s(literal 1/4 binary64) (neg.f64 d))
(/.f64 #s(literal -1/4 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d))))
(.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)))
(.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)) (/.f64 #s(literal -1/4 binary64) d))
(.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) (.f64 d d)) #s(literal -1/4 binary64))
(.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) (/.f64 #s(literal -1/4 binary64) (.f64 d d)))
(.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) (.f64 d d)))
(/.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (*.f64 h #s(literal -1/4 binary64))) d) d)
(/.f64 (.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) (/.f64 #s(literal -1/4 binary64) d)) d)
(/.f64 (.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)) #s(literal -1/4 binary64)) d)
(/.f64 (neg.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64)))) (neg.f64 (.f64 d d)))
(/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64))) (.f64 d d))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 D D)) (.f64 (*.f64 M M) h))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (*.f64 h #s(literal -1/4 binary64)))
(.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) #s(literal -1/4 binary64))
(.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h))
(.f64 (.f64 M D) (.f64 (.f64 M D) h))
(.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h)
(.f64 (.f64 (.f64 M M) h) (.f64 D D))
(.f64 (.f64 D D) (.f64 (.f64 M M) h))
(.f64 h (pow.f64 (.f64 M D) #s(literal 2 binary64)))
(.f64 (pow.f64 (exp.f64 (log.f64 (.f64 M D))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (*.f64 M D))) #s(literal 1 binary64)))
(.f64 (.f64 (*.f64 M D) M) D)
(.f64 (pow.f64 (.f64 M D) #s(literal 1 binary64)) (pow.f64 (*.f64 M D) #s(literal 1 binary64)))
(.f64 (neg.f64 (.f64 M D)) (neg.f64 (*.f64 M D)))
(.f64 (fabs.f64 (.f64 M D)) (fabs.f64 (*.f64 M D)))
(.f64 (exp.f64 (log.f64 (.f64 M D))) (exp.f64 (log.f64 (*.f64 M D))))
(.f64 (.f64 M D) (*.f64 M D))
(.f64 (.f64 M M) (*.f64 D D))
(.f64 (.f64 D D) (*.f64 M M))
(.f64 M (.f64 D (*.f64 M D)))
(pow.f64 (pow.f64 (*.f64 M D) #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (*.f64 M D)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (*.f64 M D)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 M D))) #s(literal 2 binary64))
(pow.f64 (*.f64 M D) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (exp.f64 (log.f64 (.f64 M D)))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))))
(.f64 (log.f64 (.f64 (pow.f64 M #s(literal 1 binary64)) D)) #s(literal 2 binary64))
(.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (log.f64 (.f64 (pow.f64 M #s(literal 1 binary64)) D)))
(.f64 #s(literal 2 binary64) (log.f64 (.f64 M D)))
(+.f64 (.f64 #s(literal 2 binary64) (log.f64 D)) (.f64 #s(literal 2 binary64) (log.f64 M)))
(+.f64 (.f64 (log.f64 D) #s(literal 2 binary64)) (.f64 (neg.f64 (neg.f64 (log.f64 M))) #s(literal 2 binary64)))
(+.f64 (.f64 (log.f64 D) #s(literal 2 binary64)) (.f64 (log.f64 M) #s(literal 2 binary64)))
(+.f64 (log.f64 (.f64 (pow.f64 M #s(literal 1 binary64)) D)) (log.f64 (.f64 (pow.f64 M #s(literal 1 binary64)) D)))
(+.f64 (log.f64 (.f64 M D)) (log.f64 (.f64 M D)))
(log.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (log.f64 D) #s(literal 2 binary64)) (pow.f64 (log.f64 M) #s(literal 2 binary64))) (log.f64 (/.f64 D M)))
(/.f64 (+.f64 (pow.f64 (log.f64 D) #s(literal 3 binary64)) (pow.f64 (log.f64 M) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 D) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 M) #s(literal 2 binary64)) (*.f64 (log.f64 D) (log.f64 M)))))
(+.f64 (log.f64 M) (log.f64 D))
(+.f64 (log.f64 D) (log.f64 M))
(log.f64 (*.f64 M 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))))) (.f64 (/.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#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))))) (.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 (+ 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))))) (.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 (+ 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))))) (.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 (/ (/ (pow (* d c0) 2) (* (* D w) (* D w))) h) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 w w))))
#s(approx (/ (pow (* d c0) 2) (* (* D w) (* D w))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (.f64 D w) #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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d))))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (+.f64 (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 h d))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (.f64 w w)))))
#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 (.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 (/ (* 2 (* (* d d) c0)) (* h (* (* D w) D))) (/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 h w) D) D)))
#s(approx (* 2 (* (* d d) c0)) (.f64 (.f64 (*.f64 d d) c0) #s(literal 2 binary64)))
#s(approx (* (* d d) c0) (.f64 (.f64 d d) c0))
#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))))) (.f64 (/.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#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))))) (.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 (+ 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))))) (.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 (+ 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))))) (.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 (+ 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))))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 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))))) (.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #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 (+ 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))))) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #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 (+ 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))))) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #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 (* d d)) (* (* 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) #s(literal 2 binary64)) (.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 #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 (+ (/ (* c0 (* d d)) (* (* 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 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 (+ (/ (* c0 (* d d)) (* (* 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 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 #s(literal -2 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (*.f64 h w) D) D))))) c0))
#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))))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 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))))) (.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #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 (+ 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))))) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #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 (+ 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))))) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #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 (+ 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))))) (.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 (+ 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))))) (.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 M D) #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 (+ 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))))) (.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 M D) #s(literal 2 binary64)) h) (pow.f64 (.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (.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 c0 c0)))
#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))))) (.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 #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 M D) #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)))) (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 (.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 d) (.f64 (.f64 (.f64 h w) D) D))) (neg.f64 (/.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 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 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 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 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 (* (/ 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))))) (.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 (+ 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))))) (.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 M D) #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 (+ 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))))) (.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 M D) #s(literal 2 binary64)) h) (pow.f64 (.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (.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 c0 c0)))
#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))))) (.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 #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 M D) #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 (+ 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))))) (/.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 w w) h) (.f64 d d))) #s(literal -1/4 binary64))) (.f64 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))))) (/.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 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 h 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 (+ 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))))) (/.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) d) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 h d)))) (.f64 w w)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h))) (.f64 w w)))
#s(approx (* (* D w) (* D w)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))
#s(approx (* D w) (*.f64 D w))
#s(approx w w)
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 w w) h) (.f64 d d))) #s(literal -1/4 binary64))) (.f64 w w)))
#s(approx (* 2 w) (*.f64 w #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 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.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 M D) #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 M D) #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 (* h (* (* D w) D)) (.f64 (.f64 (*.f64 h w) D) D))
#s(approx (* (* D w) D) (.f64 (.f64 D D) 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))))) (/.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D D) h)) (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 w w) h) (.f64 d d))) #s(literal -1/4 binary64))) (.f64 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))))) (/.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 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 h 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 (+ 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))))) (/.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) d) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 h 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 (+ 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))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 h w) D) D)))) 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))))) (/.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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 h w) D) D))))) 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))))) (/.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 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 h w) 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 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 (/.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 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 h w) D) D)) (.f64 (sqrt.f64 #s(literal -1 binary64)) 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))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 h w) D) D)))) 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))))) (/.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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 h w) D) D))))) 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))))) (/.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 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 h w) D) D)))))) 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))))) (neg.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 h w) D) D)))) 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))))) (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 (+ 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))))) (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 (+ 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))))) (neg.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 h w) D) D)))) 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))))) (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 (+ 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))))) (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 (+ 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))))) (/.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M h) #s(literal 2 binary64)) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 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))))) (/.f64 (+.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 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 M D) #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 (+ 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))))) (/.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 M D) #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 h h)
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M h) #s(literal 2 binary64)) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 binary64)))) h))
#s(approx (/ (* (* (* (* M D) (* M D)) h) -1/4) (* d d)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d))))
#s(approx (* (* (exp (* (log (* M D)) 2)) h) -1/4) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (*.f64 h #s(literal -1/4 binary64))))
#s(approx (* (exp (* (log (* M D)) 2)) h) (.f64 (pow.f64 (.f64 M D) #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 M D) #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 M D) #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 M D) #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 (+ 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))))) (/.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 M h) #s(literal 2 binary64)) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64)) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (pow.f64 (*.f64 D w) #s(literal 2 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))))) (/.f64 (+.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 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 M D) #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 (+ 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))))) (/.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 M D) #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 (/ (* (* (* (* M D) (* M D)) h) -1/4) (* d d)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d))))
#s(approx (/ (* (pow (* M D) 2) h) d) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 h d)))
#s(approx (* (exp (* (log (* M D)) 2)) h) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h))
#s(approx (/ (* (* (* (* M D) (* M D)) h) -1/4) (* d d)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d))))
#s(approx (* (* (exp (* (log (* M D)) 2)) h) -1/4) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (*.f64 h #s(literal -1/4 binary64))))
#s(approx (* (exp (* (log (* M D)) 2)) h) (.f64 (pow.f64 (.f64 M D) #s(literal 2 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))))) (.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 (+ 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))))) (+.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 (+ 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))))) (+.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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 h w) #s(literal 2 binary64)) (.f64 D D))) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) #s(literal -1/4 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))))) (.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 (+ 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))))) (+.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 (+ 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))))) (+.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 (+ 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))))) (-.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 (+ 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))))) (-.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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (neg.f64 (.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 h w) #s(literal 2 binary64)) (.f64 D D)))) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) #s(literal -1/4 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 (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 (+ 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))))) (-.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 (+ 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))))) (-.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 (+ 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))))) (/.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 (+ 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))))) (/.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 (+ 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))))) (/.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)
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.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 (* (* M D) (* M D)) (pow.f64 (*.f64 M D) #s(literal 2 binary64)))
#s(approx (* M D) (*.f64 M 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 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 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.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 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 h w))) (.f64 D 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))))) (/.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 (+ 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))))) (/.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 (+ 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))))) (/.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 (* (* M D) (* M D)) (pow.f64 (*.f64 M D) #s(literal 2 binary64)))
#s(approx (* (* M D) (* M D)) (pow.f64 (*.f64 M D) #s(literal 2 binary64)))
#s(approx (* (log (* M D)) 2) (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64)))
#s(approx (log (* M D)) (log.f64 (*.f64 M D)))
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #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))) (.f64 D D)))
#s(approx (* (log (* M D)) 2) (.f64 (log.f64 (.f64 (pow.f64 D #s(literal 1 binary64)) M)) #s(literal 2 binary64)))
#s(approx (log (* M D)) (log.f64 (*.f64 (pow.f64 D #s(literal 1 binary64)) M)))
#s(approx (* (log (* M D)) 2) (*.f64 (+.f64 (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) D))) (log.f64 (neg.f64 M))) #s(literal 2 binary64)))
#s(approx (log (* M D)) (+.f64 (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) D))) (log.f64 (neg.f64 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))))) (+.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 (+ 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))))) (+.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)
#s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (+.f64 (.f64 (/.f64 (.f64 c0 c0) (.f64 D D)) (/.f64 (pow.f64 d #s(literal 4 binary64)) (.f64 (.f64 w w) h))) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64)))) (*.f64 d d)))
#s(approx (* 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 (/.f64 (/.f64 c0 (.f64 D D)) (.f64 h w)) (/.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 (+ (/ (* c0 (* d d)) (* (* 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 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 (/.f64 c0 (.f64 D D)) (.f64 h w))) (.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) 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))))) (+.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 (+ 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))))) (+.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 (/ -1/4 d) (/.f64 #s(literal -1/4 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))))) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64))) (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 (+ 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))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64))) (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 (+ 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))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64))) (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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64))) (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)) (* (* 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 M D) #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 M D) #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 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 (/.f64 c0 (.f64 D D)) (.f64 h w))))) (.f64 d 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))))) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64))) (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 (+ 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))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64))) (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 (+ 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))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h #s(literal -1/4 binary64))) (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 (+ 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))))) (+.f64 (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 h d))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (.f64 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))))) (+.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 (+ 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))))) (+.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 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 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 h w)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64)) (/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.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 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.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 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 h w) D) 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))))) (+.f64 (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (/.f64 h d))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (.f64 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))))) (+.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 (+ 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))))) (+.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 (+ 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))))) (.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 (+ 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))))) (.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 (+ 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))))) (.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 (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (+.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 w w)) h)) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 D D) h)) (.f64 d d))) (*.f64 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 (.f64 (/.f64 (.f64 c0 c0) (pow.f64 D #s(literal 4 binary64))) (/.f64 (pow.f64 d #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 (.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (.f64 M M)))) #s(literal 1/2 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 (pow.f64 (.f64 h w) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (.f64 M M)))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) M) (*.f64 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))))) (.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 (+ 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))))) (.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 (+ 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))))) (.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 (* (log (* M D)) 2) (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64)))
#s(approx (log (* M D)) (log.f64 (*.f64 (pow.f64 M #s(literal 1 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))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) 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))))) (.f64 (neg.f64 M) (-.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)))))
#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))))) (.f64 (neg.f64 M) (-.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)))))
#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))))) (.f64 (neg.f64 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 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)))))
#s(approx (+ (/ (* c0 (* 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 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 M) (+.f64 (neg.f64 (/.f64 (.f64 (.f64 d d) c0) (.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 (neg.f64 M) (+.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 (.f64 d d) c0) (.f64 (.f64 (*.f64 h w) D) D))) 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 M) (+.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 (.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))) (.f64 M M)))) #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)))))
#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))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) 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))))) (.f64 (neg.f64 M) (-.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)))))
#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))))) (.f64 (neg.f64 M) (-.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)))))
#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))))) (.f64 (neg.f64 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 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)))))
#s(approx (* (log (* M D)) 2) (*.f64 (+.f64 (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) M))) (log.f64 (neg.f64 D))) #s(literal 2 binary64)))
#s(approx (log (* M D)) (+.f64 (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) M))) (log.f64 (neg.f64 D))))

eval89.0ms (0.9%)

Memory: -4.0MiB live, 113.6MiB allocated; 89ms collecting garbage
Compiler: Compiled 35 257 to 2 069 computations (94.1% saved)

prune140.0ms (1.3%)

Memory

42.8MiB live, 261.8MiB allocated; 56ms collecting garbage

Pruning

44 alts after pruning (41 fresh and 3 done)

	Pruned	Kept	Total
New	362	17	379
Fresh	5	24	29
Picked	3	2	5
Done	0	1	1
Total	370	44	414

Accuracy

76.4%

Counts

414 → 44

Alt Table

Click to see full alt table

Status	Accuracy	Program
	34.1%	(/.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 (.f64 d d) c0) #s(literal 2 binary64)) h) (.f64 (.f64 D w) D)))) (.f64 w #s(literal 2 binary64)))
	34.8%	(/.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 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 (.f64 (.f64 d d) c0) D)))) (.f64 w #s(literal 2 binary64)))
	31.3%	(.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))))
	32.8%	(.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 h (.f64 (.f64 D w) D)))))
	22.9%	(.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 (.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 D D) h) w))) c0)))
✓	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)))
	19.1%	(.f64 (/.f64 c0 (.f64 w #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 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w)))
	20.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 (/.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)))))
	29.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))) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (*.f64 h w) D) D)))))
	21.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 #s(literal 2 binary64) (.f64 (.f64 d c0) d)) (.f64 (.f64 D D) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 D D)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) w)))
	36.4%	(.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 #s(literal 2 binary64) (.f64 d c0)) d) (.f64 (.f64 h (.f64 w D)) D))))
	36.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 #s(literal 2 binary64) (.f64 (.f64 d c0) d)) (.f64 h (.f64 (.f64 D w) D)))))
	32.4%	(.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 (exp.f64 (.f64 (log.f64 d) #s(literal 2 binary64))) c0)) (.f64 h (.f64 (.f64 D w) D)))))
	21.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 #s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/.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)) d) (/.f64 (.f64 (*.f64 w w) h) d)) #s(literal -1/2 binary64))) c0)) w)))
	29.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 #s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))) w)))
	19.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 #s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)))) w)))
	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 #s(literal 2 binary64) h) (/.f64 (.f64 (.f64 d d) c0) (.f64 (*.f64 D w) D)))))
	23.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 (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)))
	3.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)))) (neg.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 h w) D) D))) c0))))
	25.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)))) #s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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)))))
	2.3%	#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))))) (.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) (.f64 c0 c0)) w) #s(literal -1/2 binary64)))
	2.9%	#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))))) (.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 M D) #s(literal 2 binary64)) h) (pow.f64 (.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (.f64 c0 c0)))
	33.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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)))))
	29.9%	#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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) h) d)) (/.f64 #s(literal -1/4 binary64) d))))
	39.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))))) (/.f64 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D w) D) w)) h))
	39.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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 D (.f64 w (.f64 D w)))) h))
	13.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 (/.f64 (pow.f64 (.f64 c0 d) #s(literal 2 binary64)) (.f64 D D)) (.f64 (exp.f64 (.f64 (log.f64 w) #s(literal 2 binary64))) h)))
	45.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 (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 D w)) (*.f64 D w)) h))
	28.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 (/.f64 (.f64 (.f64 d d) (.f64 c0 c0)) (.f64 (.f64 D w) (.f64 D w))) h))
	40.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 (/.f64 (.f64 (.f64 d c0) (.f64 d c0)) (.f64 (.f64 D w) (.f64 D w))) h))
	29.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))))) (/.f64 (/.f64 (.f64 (.f64 d c0) (.f64 d c0)) (.f64 D D)) (.f64 (.f64 w w) h)))
	22.9%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 D D)) (/.f64 (.f64 d d) (*.f64 w w))) h))
	28.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))))) (/.f64 (.f64 (.f64 c0 c0) (/.f64 (.f64 d d) (pow.f64 (.f64 D w) #s(literal 2 binary64)))) h))
	15.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 #s(approx (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d)))) (.f64 w w)))
	21.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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 w w)))))
	31.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (pow.f64 (exp.f64 (log.f64 (.f64 M D))) #s(literal 2 binary64)) h) #s(literal -1/4 binary64)) (.f64 d d))))
	12.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (+.f64 (cosh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64)))) h) #s(literal -1/4 binary64)) (*.f64 d d))))
	29.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) (.f64 D D)) h) #s(literal -1/4 binary64)) (.f64 d d))))
	28.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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 D D)) #s(literal -1/4 binary64)) (.f64 d d))))
✓	31.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #s(literal -1/4 binary64)) (.f64 d d))))
	31.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) h) #s(literal -1/4 binary64)) (.f64 d d))))
	31.9%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d))))
	29.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (exp.f64 (.f64 (/.f64 (-.f64 (pow.f64 (log.f64 D) #s(literal 2 binary64)) (pow.f64 (log.f64 M) #s(literal 2 binary64))) (log.f64 (/.f64 D M))) #s(literal 2 binary64))) h) #s(literal -1/4 binary64)) (.f64 d d))))
✓	31.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) h) #s(literal -1/4 binary64)) (*.f64 d d))))

Compiler

Compiled 10 126 to 2 161 computations (78.7% saved)

regimes287.0ms (2.7%)

Memory

-11.8MiB live, 325.3MiB allocated; 63ms collecting garbage

Counts

80 → 2

Calls

Call 1

Inputs
(.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 (* 2 w)) (+ (/ (* c0 (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) (.f64 D D)) h) #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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) h) d)) (/.f64 #s(literal -1/4 binary64) 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 d c0) (.f64 d c0)) (.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 d c0) (.f64 d c0)) (.f64 (.f64 D w) (.f64 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 (.f64 d d) (.f64 c0 c0)) (.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 d d) (.f64 c0 c0)) (.f64 (.f64 D w) (.f64 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 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (*.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 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) 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 D D) h) w))) (.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 #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 (+ 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))))) (.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) (.f64 c0 c0)) w) #s(literal -1/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 (.f64 d c0) d)) (.f64 h (.f64 (.f64 D 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 (.f64 d c0) d)) (.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 h (.f64 (.f64 D 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 (.f64 d 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 (.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 (/.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 #s(literal 2 binary64) (.f64 d c0)) d) (.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 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) 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)))) (neg.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) 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 #s(literal 0 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)))) (.f64 (/.f64 #s(literal 2 binary64) h) (/.f64 (.f64 (.f64 d d) c0) (.f64 (*.f64 D 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 (.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 #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(approx (+ (/ ( c0 (* d d)) (* (* 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)) h) (.f64 (.f64 D w) D)))) (.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(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))) w)))
(.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 #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 c0) d)) (.f64 (.f64 D D) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 D D)) (.f64 (.f64 d d) c0)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 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))))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (/.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 c0 c0) (/.f64 (.f64 d d) (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 (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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 D (.f64 w (.f64 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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 D w) (.f64 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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D w) 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)) 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 (.f64 d c0) #s(literal 2 binary64)) (.f64 D w)) (*.f64 D w)) h))
(.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 c0 (.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 (.f64 D D) 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 #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)))) #s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) d) (/.f64 (.f64 (.f64 w w) h) d)))) (.f64 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 #s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)))) 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)))) #s(approx (/ (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) w) (.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)))))
(/.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 c0) 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)))
(.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 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))))
(.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) 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 (+ 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))))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (pow.f64 (*.f64 D w) #s(literal 2 binary64)) h)))
(.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 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0))) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)))) w)))
(.f64 (/.f64 c0 (.f64 w #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 (pow.f64 (.f64 M D) #s(literal 2 binary64)) (.f64 d d)) (/.f64 (.f64 (.f64 w w) h) c0)) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 c0 (.f64 D D)) (/.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 (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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) h) #s(literal -1/4 binary64)) (*.f64 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 (/.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)))))
(.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 (exp.f64 (.f64 (log.f64 d) #s(literal 2 binary64))) c0)) (.f64 h (.f64 (.f64 D 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 (exp.f64 (.f64 (log.f64 d) #s(literal 2 binary64))) c0)) (.f64 (.f64 h (.f64 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 (.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 (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 #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 (+ 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))))) (.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 M D) #s(literal 2 binary64)) h) (pow.f64 (.f64 d c0) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (.f64 c0 c0)))
(.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 (.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 D D) h) w))) 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)))) (.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)))) (/.f64 #s(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (/.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)) d) (/.f64 (.f64 (*.f64 w w) h) d)) #s(literal -1/2 binary64))) c0)) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (pow.f64 (exp.f64 (log.f64 (.f64 M D))) #s(literal 2 binary64)) h) #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 (pow.f64 (.f64 c0 d) #s(literal 2 binary64)) (.f64 D D)) (.f64 (exp.f64 (.f64 (log.f64 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 (.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (+.f64 (cosh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 M D)) #s(literal 2 binary64)))) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (exp.f64 (.f64 (/.f64 (-.f64 (pow.f64 (log.f64 D) #s(literal 2 binary64)) (pow.f64 (log.f64 M) #s(literal 2 binary64))) (log.f64 (/.f64 D M))) #s(literal 2 binary64))) h) #s(literal -1/4 binary64)) (.f64 d d))))

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 (*.f64 #s(literal 2 binary64) (*.f64 d c0)) d) (*.f64 (*.f64 h (*.f64 w D)) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d))))

Calls

10 calls:

57.0ms	(*.f64 d d)
41.0ms	d
30.0ms	(*.f64 M M)
25.0ms	D
25.0ms	w

Results

Accuracy	Segments	Branch
45.3%	1	`(*.f64 M M)`
48.9%	3	`(*.f64 D D)`
45.3%	1	`(*.f64 d d)`
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)))))`
49.8%	3	`c0`
45.3%	1	`w`
45.3%	1	`h`
50.4%	3	`D`
48.4%	2	`d`
50.7%	4	`M`

Compiler

Compiled 67 to 78 computations (-16.4% saved)

regimes15.0ms (0.1%)

Memory

-20.7MiB live, 23.7MiB allocated; 3ms collecting garbage

Counts

40 → 2

Calls

Call 1

Inputs
(.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 (* 2 w)) (+ (/ (* c0 (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) (.f64 D D)) h) #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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) h) d)) (/.f64 #s(literal -1/4 binary64) 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 d c0) (.f64 d c0)) (.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 d c0) (.f64 d c0)) (.f64 (.f64 D w) (.f64 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 (.f64 d d) (.f64 c0 c0)) (.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 d d) (.f64 c0 c0)) (.f64 (.f64 D w) (.f64 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 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (*.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 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) 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 D D) h) w))) (.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 #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 (+ 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))))) (.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) (.f64 c0 c0)) w) #s(literal -1/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 (.f64 d c0) d)) (.f64 h (.f64 (.f64 D 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 (.f64 d c0) d)) (.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 h (.f64 (.f64 D 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 (.f64 d 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 (.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 (/.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 #s(literal 2 binary64) (.f64 d c0)) d) (.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 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) 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)))) (neg.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) 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 #s(literal 0 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)))) (.f64 (/.f64 #s(literal 2 binary64) h) (/.f64 (.f64 (.f64 d d) c0) (.f64 (*.f64 D 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 (.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 #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(approx (+ (/ ( c0 (* d d)) (* (* 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)) h) (.f64 (.f64 D w) D)))) (.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(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))) w)))
(.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 #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 c0) d)) (.f64 (.f64 D D) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 D D)) (.f64 (.f64 d d) c0)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 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))))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)))))

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 (*.f64 #s(literal 2 binary64) (*.f64 d c0)) d) (*.f64 (*.f64 h (*.f64 w D)) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (*.f64 (/.f64 #s(literal -1/4 binary64) d) (*.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d)))))

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

Accuracy	Segments	Branch
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)

regimes12.0ms (0.1%)

Memory

24.0MiB live, 24.0MiB allocated; 0ms collecting garbage

Counts

39 → 2

Calls

Call 1

Inputs
(.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 (* 2 w)) (+ (/ (* c0 (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) (.f64 D D)) h) #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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) h) d)) (/.f64 #s(literal -1/4 binary64) 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 d c0) (.f64 d c0)) (.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 d c0) (.f64 d c0)) (.f64 (.f64 D w) (.f64 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 (.f64 d d) (.f64 c0 c0)) (.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 d d) (.f64 c0 c0)) (.f64 (.f64 D w) (.f64 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 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (*.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 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) 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 D D) h) w))) (.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 #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 (+ 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))))) (.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) (.f64 c0 c0)) w) #s(literal -1/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 (.f64 d c0) d)) (.f64 h (.f64 (.f64 D 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 (.f64 d c0) d)) (.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 h (.f64 (.f64 D 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 (.f64 d 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 (.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 (/.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 #s(literal 2 binary64) (.f64 d c0)) d) (.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 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) 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)))) (neg.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) 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 #s(literal 0 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)))) (.f64 (/.f64 #s(literal 2 binary64) h) (/.f64 (.f64 (.f64 d d) c0) (.f64 (*.f64 D 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 (.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 #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(approx (+ (/ ( c0 (* d d)) (* (* 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)) h) (.f64 (.f64 D w) D)))) (.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(approx (+ (/ (* 2 (* (* d d) c0)) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* (* d d) c0)) -1/2)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) h))) w)))
(.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 #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 c0) d)) (.f64 (.f64 D D) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 D D)) (.f64 (.f64 d d) c0)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (pow.f64 (.f64 M D) #s(literal 2 binary64)) h) #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 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 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))))) (/.f64 (pow.f64 (.f64 d c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (*.f64 w w))))

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 (*.f64 #s(literal 2 binary64) (*.f64 d c0)) d) (*.f64 (*.f64 h (*.f64 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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (*.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M D) h)) #s(literal -1/4 binary64)) (*.f64 d d))))

Calls

1 calls:

8.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

Accuracy	Segments	Branch
53.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)

regimes10.0ms (0.1%)

Memory

-28.3MiB live, 17.3MiB allocated; 3ms collecting garbage

Counts

25 → 2

Calls

Call 1

Inputs
(.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 (* 2 w)) (+ (/ (* c0 (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) (.f64 D D)) h) #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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) h) d)) (/.f64 #s(literal -1/4 binary64) 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 d c0) (.f64 d c0)) (.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 d c0) (.f64 d c0)) (.f64 (.f64 D w) (.f64 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 (.f64 d d) (.f64 c0 c0)) (.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 d d) (.f64 c0 c0)) (.f64 (.f64 D w) (.f64 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 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (*.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 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) 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 D D) h) w))) (.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 #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 (+ 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))))) (.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) (.f64 c0 c0)) w) #s(literal -1/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 (.f64 d c0) d)) (.f64 h (.f64 (.f64 D 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 (.f64 d c0) d)) (.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 h (.f64 (.f64 D 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 (.f64 d 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 (.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))))

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 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (*.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M D) h)) #s(literal -1/4 binary64)) (*.f64 d d))))

Calls

1 calls:

8.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

Accuracy	Segments	Branch
52.9%	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)

regimes7.0ms (0.1%)

Memory

13.8MiB live, 13.8MiB allocated; 0ms collecting garbage

Counts

23 → 2

Calls

Call 1

Inputs
(.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 (* 2 w)) (+ (/ (* c0 (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) (.f64 D D)) h) #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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) h) d)) (/.f64 #s(literal -1/4 binary64) 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 d c0) (.f64 d c0)) (.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 d c0) (.f64 d c0)) (.f64 (.f64 D w) (.f64 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 (.f64 d d) (.f64 c0 c0)) (.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 d d) (.f64 c0 c0)) (.f64 (.f64 D w) (.f64 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 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (*.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 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) 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 D D) h) w))) (.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 #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 (+ 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))))) (.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) (.f64 c0 c0)) w) #s(literal -1/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 (.f64 d c0) d)) (.f64 h (.f64 (.f64 D 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 (.f64 d c0) d)) (.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 h (.f64 (.f64 D 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 (.f64 d d) c0)) (.f64 (.f64 h w) (.f64 D D)))))

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 #s(literal 2 binary64) (*.f64 (*.f64 d c0) d)) (*.f64 h (*.f64 (*.f64 D w) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (*.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M D) h)) #s(literal -1/4 binary64)) (*.f64 d d))))

Calls

1 calls:

5.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

Accuracy	Segments	Branch
52.9%	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)

regimes6.0ms (0.1%)

Memory

12.3MiB live, 12.3MiB allocated; 0ms collecting garbage

Counts

19 → 2

Calls

Call 1

Inputs
(.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 (* 2 w)) (+ (/ (* c0 (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) (.f64 D D)) h) #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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) h) d)) (/.f64 #s(literal -1/4 binary64) 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 d c0) (.f64 d c0)) (.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 d c0) (.f64 d c0)) (.f64 (.f64 D w) (.f64 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 (.f64 d d) (.f64 c0 c0)) (.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 d d) (.f64 c0 c0)) (.f64 (.f64 D w) (.f64 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 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (*.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 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) 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 D D) h) w))) (.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 #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 (+ 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))))) (.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))) (.f64 c0 c0)) w) #s(literal -1/2 binary64)))

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 (*.f64 d d) c0)) (*.f64 h (*.f64 (*.f64 D w) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (*.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M D) h)) #s(literal -1/4 binary64)) (*.f64 d d))))

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

Accuracy	Segments	Branch
52.5%	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%)

Memory

11.6MiB live, 11.6MiB allocated; 0ms collecting garbage

Counts

14 → 2

Calls

Call 1

Inputs
(.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 (* 2 w)) (+ (/ (* c0 (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) (.f64 D D)) h) #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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) h) d)) (/.f64 #s(literal -1/4 binary64) 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 d c0) (.f64 d c0)) (.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 d c0) (.f64 d c0)) (.f64 (.f64 D w) (.f64 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 (.f64 d d) (.f64 c0 c0)) (.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 d d) (.f64 c0 c0)) (.f64 (.f64 D w) (.f64 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 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (*.f64 w w))) 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))))) (/.f64 (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.f64 (*.f64 D w) (*.f64 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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (*.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M D) h)) #s(literal -1/4 binary64)) (*.f64 d d))))

Calls

1 calls:

3.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

Accuracy	Segments	Branch
49.9%	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)

regimes47.0ms (0.5%)

Memory

-21.0MiB live, 34.1MiB allocated; 40ms collecting garbage

Counts

10 → 2

Calls

Call 1

Inputs
(.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 (* 2 w)) (+ (/ (* c0 (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) (.f64 D D)) h) #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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) h) d)) (/.f64 #s(literal -1/4 binary64) 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 d c0) (.f64 d c0)) (.f64 D D)) (.f64 (.f64 w w) 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))))) (/.f64 (/.f64 (*.f64 (*.f64 d c0) (*.f64 d c0)) (*.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (*.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M D) h)) #s(literal -1/4 binary64)) (*.f64 d d))))

Calls

4 calls:

36.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)))))
3.0ms	d
3.0ms	D
3.0ms	c0

Results

Accuracy	Segments	Branch
41.4%	3	`c0`
38.7%	3	`d`
39.1%	3	`D`
47.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)))))`

Compiler

Compiled 55 to 39 computations (29.1% saved)

regimes91.0ms (0.9%)

Memory

-2.6MiB live, 46.2MiB allocated; 7ms collecting garbage

Counts

9 → 2

Calls

Call 1

Inputs
(.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 (* 2 w)) (+ (/ (* c0 (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) (.f64 D D)) h) #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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) h) d)) (/.f64 #s(literal -1/4 binary64) d))))

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))))) (*.f64 (*.f64 c0 c0) (/.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (*.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M D) h)) #s(literal -1/4 binary64)) (*.f64 d d))))

Calls

7 calls:

72.0ms	(*.f64 D D)
3.0ms	M
3.0ms	w
3.0ms	h
3.0ms	(*.f64 d d)

Results

Accuracy	Segments	Branch
37.6%	3	`(*.f64 d d)`
35.6%	3	`w`
31.9%	1	`h`
34.6%	2	`(*.f64 M M)`
36.4%	3	`(*.f64 D D)`
35.0%	2	`M`
46.1%	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 64 to 60 computations (6.3% saved)

regimes54.0ms (0.5%)

Memory

-2.3MiB live, 44.3MiB allocated; 2ms collecting garbage

Counts

7 → 1

Calls

Call 1

Inputs
(.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 (* 2 w)) (+ (/ (* c0 (* 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) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M D) (.f64 M D)) h) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) (.f64 D D)) h) #s(literal -1/4 binary64)) (.f64 d d))))

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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (*.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M D) h)) #s(literal -1/4 binary64)) (*.f64 d d))))

Calls

10 calls:

30.0ms	M
3.0ms	w
3.0ms	c0
3.0ms	h
3.0ms	D

Results

Accuracy	Segments	Branch
31.9%	1	`h`
31.9%	1	`w`
31.9%	1	`(*.f64 M M)`
31.9%	1	`(*.f64 D D)`
31.9%	1	`M`
31.9%	1	`(*.f64 d d)`
31.9%	1	`d`
31.9%	1	`D`
31.9%	1	`c0`
31.9%	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)

regimes15.0ms (0.1%)

Memory

-8.8MiB live, 36.9MiB allocated; 2ms collecting garbage

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts

2 → 1

Calls

Call 1

Inputs

(*.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 (+.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)))

Calls

10 calls:

3.0ms	d
1.0ms	D
1.0ms	w
1.0ms	h
1.0ms	c0

Results

Accuracy	Segments	Branch
0.0%	1	`c0`
0.0%	1	`(*.f64 M M)`
0.0%	1	`d`
0.0%	1	`(*.f64 d d)`
0.0%	1	`M`
0.0%	1	`(*.f64 D D)`
0.0%	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)))))`
0.0%	1	`D`
0.0%	1	`w`
0.0%	1	`h`

Compiler

Compiled 67 to 78 computations (-16.4% saved)

bsearch2.0ms (0%)

Memory

4.1MiB live, 4.1MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN

Compiler

Compiled 55 to 30 computations (45.5% saved)

bsearch1.0ms (0%)

Memory

2.1MiB live, 2.1MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN

Compiler

Compiled 55 to 30 computations (45.5% saved)

bsearch1.0ms (0%)

Memory

2.0MiB live, 2.0MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN

Compiler

Compiled 55 to 30 computations (45.5% saved)

bsearch1.0ms (0%)

Memory

1.5MiB live, 1.5MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN

Compiler

Compiled 55 to 30 computations (45.5% saved)

bsearch1.0ms (0%)

Memory

1.5MiB live, 1.5MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN

Compiler

Compiled 55 to 30 computations (45.5% saved)

bsearch0.0ms (0%)

Memory

1.3MiB live, 1.3MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN

Compiler

Compiled 55 to 30 computations (45.5% saved)

bsearch1.0ms (0%)

Memory

1.5MiB live, 1.5MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN

Compiler

Compiled 55 to 30 computations (45.5% saved)

bsearch0.0ms (0%)

Memory

1.1MiB live, 1.1MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN

Compiler

Compiled 55 to 30 computations (45.5% saved)

bsearch0.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN

Compiler

Compiled 55 to 30 computations (45.5% saved)

simplify56.0ms (0.5%)

Memory

1.5MiB live, 96.1MiB allocated; 15ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	130	2186
1	238	2146
2	937	2146

Stop Event

1×	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 (/.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 #s(literal 2 binary64) (.f64 d c0)) d) (.f64 (.f64 h (.f64 w D)) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d)))))
(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 (.f64 #s(literal 2 binary64) (.f64 d c0)) d) (.f64 (.f64 h (.f64 w D)) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d))))))
(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 (.f64 #s(literal 2 binary64) (.f64 d c0)) d) (.f64 (.f64 h (.f64 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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 h (.f64 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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 #s(literal 2 binary64) (.f64 (.f64 d c0) d)) (.f64 h (.f64 (.f64 D w) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 c0) (.f64 d c0)) (.f64 (.f64 D w) (.f64 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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 c0) (.f64 d c0)) (.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 (* 2 w)) (+ (/ (* c0 (* d 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 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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 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 (sqrt.f64 #s(literal -1 binary64)) M)))

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 (/.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 #s(literal 2 binary64) (.f64 d c0)) d) (.f64 (.f64 h (.f64 w D)) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) h) d) (/.f64 #s(literal -1/4 binary64) d)))))
(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 (.f64 #s(literal 2 binary64) (.f64 d c0)) d) (.f64 (.f64 h (.f64 w D)) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (.f64 (/.f64 #s(literal -1/4 binary64) d) (.f64 (pow.f64 (*.f64 M D) #s(literal 2 binary64)) (/.f64 h d))))))
(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 (.f64 #s(literal 2 binary64) (.f64 d c0)) d) (.f64 (.f64 h (.f64 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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 (.f64 #s(literal 2 binary64) (.f64 d c0)) d) (.f64 (.f64 h (.f64 w D)) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 h (.f64 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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 h (.f64 w D)) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 #s(literal 2 binary64) (.f64 (.f64 d c0) d)) (.f64 h (.f64 (.f64 D w) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 #s(literal 2 binary64) (.f64 (.f64 d c0) d)) (.f64 h (.f64 (.f64 D w) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 (.f64 d d) c0)) (.f64 h (.f64 (.f64 D w) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 c0) (.f64 d c0)) (.f64 (.f64 D w) (.f64 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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 (+ 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))))) (/.f64 (/.f64 (.f64 (.f64 d c0) (.f64 d c0)) (.f64 (.f64 D w) (.f64 D w))) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* 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 c0) (.f64 d c0)) (.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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 (+ 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))))) (/.f64 (/.f64 (.f64 (.f64 d c0) (.f64 d c0)) (.f64 D D)) (.f64 (.f64 w w) 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 (* 2 w)) (+ (/ (* c0 (* d 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 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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d d)))))
(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 (+ 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))))) (.f64 (.f64 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (.f64 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #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))))) #s(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 d 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(approx (/ (+ (/ (pow (* c0 d) 2) (* (* D D) h)) (* (/ (* (pow (* D M) 2) (* (* w w) h)) (* d d)) -1/4)) (* w w)) (/.f64 (.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) h)) #s(literal -1/4 binary64)) (.f64 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 (sqrt.f64 #s(literal -1 binary64)) M)))

derivations356.0ms (3.4%)

Memory

10.2MiB live, 434.4MiB allocated; 45ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 2 186 to 129 computations (94.1% saved)

preprocess85.0ms (0.8%)

Memory

-24.4MiB live, 74.9MiB allocated; 26ms collecting garbage

Remove

(abs M)

(abs d)

(abs D)

Compiler

Compiled 7 152 to 1 152 computations (83.9% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze700.0ms (6.7%)

sample5.6s (53.4%)

explain402.0ms (3.8%)

preprocess212.0ms (2%)

eval0.0ms (0%)

prune1.0ms (0%)

series156.0ms (1.5%)

rewrite237.0ms (2.3%)

eval42.0ms (0.4%)

prune25.0ms (0.2%)

series226.0ms (2.2%)

rewrite206.0ms (2%)

eval64.0ms (0.6%)

prune58.0ms (0.6%)

series266.0ms (2.5%)

rewrite310.0ms (3%)

eval56.0ms (0.5%)

prune85.0ms (0.8%)

series300.0ms (2.9%)

rewrite243.0ms (2.3%)

eval89.0ms (0.9%)

prune140.0ms (1.3%)

regimes287.0ms (2.7%)

regimes15.0ms (0.1%)

regimes12.0ms (0.1%)

regimes10.0ms (0.1%)

regimes7.0ms (0.1%)

regimes6.0ms (0.1%)

regimes5.0ms (0%)

regimes47.0ms (0.5%)

regimes91.0ms (0.9%)

regimes54.0ms (0.5%)

regimes15.0ms (0.1%)

bsearch2.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

simplify56.0ms (0.5%)

derivations356.0ms (3.4%)

preprocess85.0ms (0.8%)

end0.0ms (0%)

Profiling