Metrics for Henrywood and Agarwal, Equation (13)

start0.0ms (0%)

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

analyze832.0ms (9.5%)

Memory

44.5MiB live, 739.4MiB allocated; 763ms 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)

sample3.9s (44.4%)

Memory

103.8MiB live, 5 386.0MiB allocated; 690ms collecting garbage

Samples

1.0s	8 284×	0	invalid
668.0ms	1 810×	2	valid
465.0ms	4 213×	0	valid
386.0ms	1 386×	1	valid
313.0ms	847×	3	valid
0.0ms	1×	3	exit

Precisions

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

ival-mult!: 1.0s (51.5% of total)

ival-div!: 351.0ms (17.7% of total)

ival-sqrt: 274.0ms (13.8% of total)

adjust: 228.0ms (11.5% of total)

ival-add!: 56.0ms (2.8% of total)

ival-sub!: 53.0ms (2.7% of total)

Bogosity

explain308.0ms (3.5%)

Memory

14.1MiB live, 536.1MiB allocated; 29ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
102	-	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))))`
56	-	1	(-4.8023856187121405e+216 -5.231698840716382e-299 3.3455433829085178e-21 -1.0480063001891331e+51 1.2583844851024116e-302 -5.51779823845227e-260)	`(.f64 (.f64 w h) (*.f64 D D))`
54	-	0	-	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`
52	-	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))`
46	-	1	(-7.62079386466523e+53 -1.396752583935265e+33 3.59037657659193e+269 1.8773359851107094e-246 6.233955291126018e-202 6.214514097968373e-183)	`(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)))`
40	-	0	-	`(.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)))))`
23	-	0	-	`(.f64 c0 (.f64 d d))`
0	-	0	-	`D`
0	-	0	-	`(*.f64 M M)`
0	-	0	-	`d`
0	-	0	-	`(*.f64 d d)`
0	-	0	-	`(*.f64 w h)`
0	-	0	-	`(*.f64 #s(literal 2 binary64) w)`
0	-	0	-	`(*.f64 D D)`
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	-	`c0`
0	-	0	-	`#s(literal 2 binary64)`
0	-	0	-	`(/.f64 c0 (*.f64 #s(literal 2 binary64) w))`
0	-	0	-	`w`
0	-	0	-	`h`
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	78	0
↳	`(.f64 c0 (.f64 d d))`	overflow	124
↳	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	overflow	162
↳	`(*.f64 D D)`	overflow	27
↳	`(*.f64 d d)`	overflow	110
↳	`(*.f64 w h)`	overflow	21
↳	`(.f64 (.f64 w h) (*.f64 D D))`	overflow	25
↳	`(.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	201
↳	`(*.f64 M M)`	overflow	52
↳	`(.f64 c0 (.f64 d d))`	overflow	248
↳	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	overflow	324
↳	`(*.f64 D D)`	overflow	54
↳	`(*.f64 w h)`	overflow	42
↳	`(.f64 (.f64 w h) (*.f64 D D))`	overflow	50
↳	`(-.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	201
↳	`(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	162
↳	`(*.f64 d d)`	overflow	220
`-.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	52	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	201
↳	`(.f64 c0 (.f64 d d))`	overflow	248
↳	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	overflow	324
↳	`(*.f64 D D)`	overflow	54
↳	`(*.f64 d d)`	overflow	220
↳	`(*.f64 w h)`	overflow	42
↳	`(.f64 (.f64 w h) (*.f64 D D))`	overflow	50
↳	`(*.f64 M M)`	overflow	52
`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	39	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	201
↳	`(*.f64 M M)`	overflow	52
↳	`(.f64 c0 (.f64 d d))`	overflow	248
↳	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	overflow	324
↳	`(*.f64 D D)`	overflow	54
↳	`(*.f64 w h)`	overflow	42
↳	`(.f64 (.f64 w h) (*.f64 D D))`	overflow	50
↳	`(-.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	201
↳	`(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	162
↳	`(*.f64 d d)`	overflow	220
`+.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	24	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**	22	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	73
↳	`(.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	6
↳	`(*.f64 M M)`	underflow	68
↳	`(.f64 c0 (.f64 d d))`	underflow	48
↳	`(*.f64 D D)`	underflow	273
↳	`(*.f64 d d)`	underflow	60
↳	`(*.f64 w h)`	underflow	174
↳	`(.f64 (.f64 w h) (*.f64 D D))`	underflow	324
↳	`(-.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	6
`*.f64`	`(.f64 c0 (.f64 d d))`	*no**	16	0
`/.f64`	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	o/o	14	0
↳	`(.f64 c0 (.f64 d d))`	overflow	124
↳	`(*.f64 d d)`	overflow	110
↳	`(*.f64 D D)`	overflow	27
↳	`(*.f64 w h)`	overflow	21
↳	`(.f64 (.f64 w h) (*.f64 D D))`	overflow	25
`*.f64`	`(.f64 (.f64 w h) (*.f64 D D))`	*nu**	13	0
`*.f64`	`(.f64 (.f64 w h) (*.f64 D D))`	*uo**	11	0
↳	`(*.f64 w h)`	underflow	58
↳	`(*.f64 D D)`	overflow	27
`/.f64`	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	u/u	10	0
↳	`(.f64 c0 (.f64 d d))`	underflow	16
↳	`(*.f64 d d)`	underflow	20
↳	`(*.f64 D D)`	underflow	91
↳	`(*.f64 w h)`	underflow	58
↳	`(.f64 (.f64 w h) (*.f64 D D))`	underflow	108
`*.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**	9	0
`/.f64`	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	o/n	9	0
↳	`(.f64 c0 (.f64 d d))`	overflow	124
↳	`(*.f64 d d)`	overflow	110
`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	6	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	6
↳	`(*.f64 M M)`	underflow	68
↳	`(.f64 c0 (.f64 d d))`	underflow	32
↳	`(*.f64 D D)`	underflow	182
↳	`(*.f64 d d)`	underflow	40
↳	`(*.f64 w h)`	underflow	116
↳	`(.f64 (.f64 w h) (*.f64 D D))`	underflow	216
↳	`(-.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	6
`*.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**	6	0
`*.f64`	`(.f64 (.f64 w h) (*.f64 D D))`	*ou**	5	0
↳	`(*.f64 w h)`	overflow	21
↳	`(*.f64 D D)`	underflow	91
`*.f64`	`(.f64 (.f64 w h) (*.f64 D D))`	*no**	4	0
`/.f64`	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	n/u	4	0
↳	`(*.f64 D D)`	underflow	91
↳	`(*.f64 w h)`	underflow	58
↳	`(.f64 (.f64 w h) (*.f64 D D))`	underflow	108
`*.f64`	`(.f64 c0 (.f64 d d))`	*nu**	3	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)))))`	*uo**	3	0
↳	`(/.f64 c0 (*.f64 #s(literal 2 binary64) w))`	underflow	15
↳	`(+.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))))`	overflow	84
↳	`(.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	201
↳	`(*.f64 M M)`	overflow	52
↳	`(.f64 c0 (.f64 d d))`	overflow	372
↳	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	overflow	486
↳	`(*.f64 D D)`	overflow	81
↳	`(*.f64 w h)`	overflow	63
↳	`(.f64 (.f64 w h) (*.f64 D D))`	overflow	75
↳	`(-.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	201
↳	`(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	162
↳	`(*.f64 d d)`	overflow	330
`/.f64`	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	u/n	2	0
↳	`(.f64 c0 (.f64 d d))`	underflow	16
↳	`(*.f64 d d)`	underflow	20
`/.f64`	`(/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (*.f64 D D)))`	n/o	1	0
↳	`(*.f64 D D)`	overflow	27
↳	`(*.f64 w h)`	overflow	21
↳	`(.f64 (.f64 w h) (*.f64 D D))`	overflow	25

Confusion

	Predicted +	Predicted -
+	182	4
-	9	61

Precision

0.9528795811518325

Recall

0.978494623655914

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	182	0	4
-	9	0	61

Precision?

0.9528795811518325

Recall?

0.978494623655914

Freqs

test

number	freq
0	65
1	88
2	74
3	22
4	6
5	1

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

42.0ms	132×	2	valid
31.0ms	278×	0	valid
25.0ms	50×	3	valid
11.0ms	52×	1	valid

Compiler

Compiled 536 to 67 computations (87.5% saved)

Precisions

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

ival-mult!: 33.0ms (46% of total)

ival-div!: 14.0ms (19.5% of total)

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

adjust: 10.0ms (14% of total)

ival-sub!: 2.0ms (2.8% of total)

ival-add!: 2.0ms (2.8% of total)

preprocess240.0ms (2.8%)

Memory

-12.0MiB live, 243.8MiB allocated; 135ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	211	1155
1	1028	1144
2	5980	1144
0	21	52
0	35	52
1	92	52
2	511	52
3	5203	46
0	8142	45

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 (fma.f64 (*.f64 (/.f64 c0 (*.f64 h w)) (/.f64 d D)) (/.f64 d D) (sqrt.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 c0 (*.f64 h w)) d) (/.f64 d (*.f64 D D))) M) (fma.f64 (*.f64 (/.f64 c0 (*.f64 h w)) d) (/.f64 d (*.f64 D D)) M)))) (/.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.1MiB live, 1.1MiB allocated; 0ms collecting garbage

Alt Table

Click to see full alt table

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

▶

27.6%

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

series152.0ms (1.7%)

Memory

-29.8MiB live, 261.6MiB allocated; 32ms 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
23.0ms	w	@	inf	((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 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	c0	@	0	((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)
10.0ms	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)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)
10.0ms	D	@	inf	((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)
10.0ms	D	@	-inf	((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)

rewrite192.0ms (2.2%)

Memory

6.2MiB live, 289.2MiB allocated; 22ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Counts

174 → 164

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

eval25.0ms (0.3%)

Memory: 6.4MiB live, 51.8MiB allocated; 5ms collecting garbage
Compiler: Compiled 17 839 to 1 230 computations (93.1% saved)

prune45.0ms (0.5%)

Memory

-18.8MiB live, 42.7MiB allocated; 11ms collecting garbage

Pruning

13 alts after pruning (13 fresh and 0 done)

	Pruned	Kept	Total
New	247	13	260
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	248	13	261

Accuracy

43.0%

Counts

261 → 13

Alt Table

Click to see full alt table

Status	Accuracy	Program
	32.5%	(/.f64 (.f64 c0 (fma.f64 (/.f64 c0 (.f64 h w)) (/.f64 (.f64 d d) (.f64 D D)) (sqrt.f64 (.f64 (fma.f64 (/.f64 c0 (.f64 h w)) (/.f64 (.f64 d d) (.f64 D D)) M) (-.f64 (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 h w) D) D)) M))))) (.f64 w #s(literal 2 binary64)))
	35.6%	(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (.f64 D D))) #s(approx (sqrt (- ( (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (*.f64 h w) D) D)))))
	22.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 (fma.f64 (.f64 (/.f64 c0 h) (/.f64 (.f64 d d) w)) #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 D D) (.f64 D D))) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D))))
▶	39.7%	(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 (.f64 h w) D) D))))
▶	23.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 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 d d) (.f64 d d)))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 h w) D) D))) (.f64 d d))))
▶	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.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 h w) D) D))) c0))))
	21.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))))) (fma.f64 (/.f64 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (.f64 (.f64 w w) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))))
▶	19.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 (fma.f64 (/.f64 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (.f64 w w)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) (.f64 h h)) (.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) h))
	20.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 (fma.f64 (/.f64 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) h) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64))) (.f64 w w)))
	1.8%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (.f64 (fma.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 (.f64 D D) (.f64 c0 c0)) (.f64 (.f64 M M) (/.f64 h (.f64 d d)))) #s(literal 1/4 binary64))) (.f64 c0 c0)))
	3.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 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 h w) D) D))) (.f64 c0 c0)) w) #s(literal -1/2 binary64)))
	29.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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 w w)))))

Compiler

Compiled 1 980 to 870 computations (56.1% saved)

series502.0ms (5.8%)

Memory

59.4MiB live, 416.1MiB allocated; 107ms collecting garbage

Counts

58 → 185

Calls

Call 1

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

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 (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(hole binary64 0))
#s(approx (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0) #s(hole binary64 0))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2)))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #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))))))
#s(approx (/ (* c0 c0) (* D D)) #s(hole binary64 (/ (pow c0 2) (pow D 2))))
#s(approx (* c0 c0) #s(hole binary64 (pow c0 2)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))) c0)))
#s(approx (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))))
#s(approx (/ (* D D) c0) #s(hole binary64 (/ (pow D 2) c0)))
#s(approx (/ (* 2 c0) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (* 2 c0) #s(hole binary64 (* 2 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (pow w 2)))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* c0 (- (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (* 0 (/ (* d d) (* (* (* h w) D) D))) #s(hole binary64 0))
#s(approx (/ (* d d) (* (* (* h w) D) D)) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* 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))) (pow w 2))))
#s(approx (/ (* d d) (* w w)) #s(hole binary64 (/ (pow d 2) (pow w 2))))
#s(approx (* w w) #s(hole binary64 (pow w 2)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) h)))) w)))
#s(approx (/ (* (* (* M M) h) w) (* (* d d) (* d d))) #s(hole binary64 (/ (* (pow M 2) (* h w)) (pow d 4))))
#s(approx (* (* (* M M) h) w) #s(hole binary64 (* (pow M 2) (* h w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* w (+ (* -2 (/ c0 (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (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/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 M) (* h h)) (* D D)) (* d d)) -1/4) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2)))))
#s(approx (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))))
#s(approx (* (* (* M M) (* h h)) (* D D)) #s(hole binary64 (* (pow D 2) (* (pow M 2) (pow h 2)))))
#s(approx (* (* M M) (* h h)) #s(hole binary64 (* (pow M 2) (pow h 2))))
#s(approx (* h h) #s(hole binary64 (pow h 2)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) w)))) h)))
#s(approx (* (* M M) h) #s(hole binary64 (* (pow M 2) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow h 2) (+ (* -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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* h (+ (* -2 (/ c0 (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (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/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (pow w 2))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* h w)))) (pow D 2))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow D 2) (+ (* -1/4 (/ (* (pow M 2) (pow h 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (pow w 2)))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 4) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx d #s(hole binary64 d))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 2) (* (pow M 2) (pow h 2)))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 2) (pow w 2)))) (pow d 2))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #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 4))))
#s(approx (* (* d d) (* d d)) #s(hole binary64 (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 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (pow w 2)))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -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 (* M M) #s(hole binary64 (pow M 2)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) (pow h 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow M 2) (pow w 2))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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
230.0ms	w	@	inf	((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0) (* 0 (/ (* d d) (* (* (* h w) D) D))) 0 (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/ (* c0 c0) (* D D)) (* c0 c0) (* D D) (/ (* d d) (* w w)) (* w w) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4) (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) (* (* (* M M) (* h h)) (* D D)) (* (* M M) (* h h)) (* M M) (* h h) -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)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* (* d d) (* d d)) -1/2 (/ (* 2 c0) (* (* (* h w) D) D)) (* 2 c0))
64.0ms	h	@	-inf	((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0) (* 0 (/ (* d d) (* (* (* h w) D) D))) 0 (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/ (* c0 c0) (* D D)) (* c0 c0) (* D D) (/ (* d d) (* w w)) (* w w) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4) (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) (* (* (* M M) (* h h)) (* D D)) (* (* M M) (* h h)) (* M M) (* h h) -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)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* (* d d) (* d d)) -1/2 (/ (* 2 c0) (* (* (* h w) D) D)) (* 2 c0))
27.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))))) (+ (/ (* 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 (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0) (* 0 (/ (* d d) (* (* (* h w) D) D))) 0 (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/ (* c0 c0) (* D D)) (* c0 c0) (* D D) (/ (* d d) (* w w)) (* w w) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4) (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) (* (* (* M M) (* h h)) (* D D)) (* (* M M) (* h h)) (* M M) (* h h) -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)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* (* d d) (* d d)) -1/2 (/ (* 2 c0) (* (* (* h w) D) D)) (* 2 c0))
27.0ms	M	@	inf	((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0) (* 0 (/ (* d d) (* (* (* h w) D) D))) 0 (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/ (* c0 c0) (* D D)) (* c0 c0) (* D D) (/ (* d d) (* w w)) (* w w) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4) (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) (* (* (* M M) (* h h)) (* D D)) (* (* M M) (* h h)) (* M M) (* h h) -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)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* (* d d) (* d d)) -1/2 (/ (* 2 c0) (* (* (* h w) D) D)) (* 2 c0))
19.0ms	c0	@	-inf	((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0) (* 0 (/ (* d d) (* (* (* h w) D) D))) 0 (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/ (* c0 c0) (* D D)) (* c0 c0) (* D D) (/ (* d d) (* w w)) (* w w) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4) (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) (* (* (* M M) (* h h)) (* D D)) (* (* M M) (* h h)) (* M M) (* h h) -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)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* (* d d) (* d d)) -1/2 (/ (* 2 c0) (* (* (* h w) D) D)) (* 2 c0))

rewrite223.0ms (2.6%)

Memory

7.7MiB live, 238.3MiB allocated; 25ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1207	15027
0	1285	12733
1	7042	12733
0	8071	12402

Stop Event

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

Counts

243 → 369

Calls

Call 1

Inputs
(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 (.f64 h w) D) D))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 (.f64 h w) D) D)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 (.f64 h w) D) D))
(.f64 #s(literal 2 binary64) (.f64 (*.f64 d d) c0))
(.f64 (.f64 d d) c0)
(*.f64 d d)
d
(.f64 (.f64 (*.f64 h w) D) D)
(.f64 (.f64 h w) D)
(*.f64 h w)
h
D
(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) M)
(sqrt.f64 #s(literal -1 binary64))
#s(literal -1 binary64)
M
(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* 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 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 h w) D) D))) c0)))
(neg.f64 (.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 h w) D) D))) c0))
(.f64 (.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 h w) D) D))) c0)
(.f64 #s(literal 0 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (*.f64 h w) D) D)))
#s(literal 0 binary64)
(/.f64 (.f64 d d) (.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 (fma.f64 (/.f64 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (.f64 w w)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) (.f64 h h)) (.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) h))
(/.f64 (fma.f64 (/.f64 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (.f64 w w)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) (.f64 h h)) (.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) h)
(fma.f64 (/.f64 (.f64 c0 c0) (.f64 D D)) (/.f64 (.f64 d d) (.f64 w w)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) (.f64 h h)) (.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64)))
(/.f64 (.f64 c0 c0) (.f64 D D))
(*.f64 c0 c0)
(*.f64 D D)
(/.f64 (.f64 d d) (.f64 w w))
(*.f64 w w)
(.f64 (/.f64 (.f64 (.f64 (.f64 M M) (.f64 h h)) (.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))
(/.f64 (.f64 (.f64 (.f64 M M) (.f64 h h)) (.f64 D D)) (.f64 d d))
(.f64 (.f64 (.f64 M M) (.f64 h h)) (*.f64 D D))
(.f64 (.f64 M M) (*.f64 h h))
(*.f64 M M)
(*.f64 h h)
#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 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 d d) (.f64 d d)))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 h w) 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 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 d d) (.f64 d d)))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 h w) D) D))) (.f64 d d)))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 d d) (.f64 d d)))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 h w) D) D))) (.f64 d d))
(fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 d d) (.f64 d d)))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 h w) D) D)))
(.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 d d) (.f64 d d))))
(/.f64 (*.f64 D D) c0)
(/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 d d) (.f64 d d)))
(.f64 (.f64 (*.f64 M M) h) w)
(.f64 (.f64 M M) h)
(.f64 (.f64 d d) (*.f64 d d))
#s(literal -1/2 binary64)
(/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 h w) D) D))
(*.f64 #s(literal 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))))) #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 (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(hole binary64 0))
#s(approx (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0) #s(hole binary64 0))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2)))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #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))))))
#s(approx (/ (* c0 c0) (* D D)) #s(hole binary64 (/ (pow c0 2) (pow D 2))))
#s(approx (* c0 c0) #s(hole binary64 (pow c0 2)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))) c0)))
#s(approx (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))))
#s(approx (/ (* D D) c0) #s(hole binary64 (/ (pow D 2) c0)))
#s(approx (/ (* 2 c0) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (* 2 c0) #s(hole binary64 (* 2 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (pow w 2)))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* c0 (- (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (* 0 (/ (* d d) (* (* (* h w) D) D))) #s(hole binary64 0))
#s(approx (/ (* d d) (* (* (* h w) D) D)) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* 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))) (pow w 2))))
#s(approx (/ (* d d) (* w w)) #s(hole binary64 (/ (pow d 2) (pow w 2))))
#s(approx (* w w) #s(hole binary64 (pow w 2)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) h)))) w)))
#s(approx (/ (* (* (* M M) h) w) (* (* d d) (* d d))) #s(hole binary64 (/ (* (pow M 2) (* h w)) (pow d 4))))
#s(approx (* (* (* M M) h) w) #s(hole binary64 (* (pow M 2) (* h w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* w (+ (* -2 (/ c0 (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (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/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 M) (* h h)) (* D D)) (* d d)) -1/4) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2)))))
#s(approx (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))))
#s(approx (* (* (* M M) (* h h)) (* D D)) #s(hole binary64 (* (pow D 2) (* (pow M 2) (pow h 2)))))
#s(approx (* (* M M) (* h h)) #s(hole binary64 (* (pow M 2) (pow h 2))))
#s(approx (* h h) #s(hole binary64 (pow h 2)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) w)))) h)))
#s(approx (* (* M M) h) #s(hole binary64 (* (pow M 2) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow h 2) (+ (* -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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* h (+ (* -2 (/ c0 (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (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/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (pow w 2))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* h w)))) (pow D 2))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow D 2) (+ (* -1/4 (/ (* (pow M 2) (pow h 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (pow w 2)))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 4) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx d #s(hole binary64 d))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 2) (* (pow M 2) (pow h 2)))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 2) (pow w 2)))) (pow d 2))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #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 4))))
#s(approx (* (* d d) (* d d)) #s(hole binary64 (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 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (pow w 2)))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -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 (* M M) #s(hole binary64 (pow M 2)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) (pow h 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow M 2) (pow w 2))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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))
(fma.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) (.f64 h w)) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)))
(fma.f64 (/.f64 c0 (.f64 h w)) (/.f64 (.f64 d d) (.f64 D D)) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)))
(fma.f64 c0 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D)) (/.f64 (.f64 (.f64 d d) c0) (.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) (*.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))
(fma.f64 (.f64 c0 d) d (.f64 (*.f64 d d) c0))
(fma.f64 (.f64 d d) c0 (.f64 (*.f64 d d) c0))
(fma.f64 d (.f64 d c0) (.f64 (*.f64 d d) c0))
(fma.f64 c0 (.f64 d d) (.f64 (*.f64 d d) c0))
(+.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 d d) c0))
(.f64 (.f64 c0 d) d)
(.f64 (.f64 d d) c0)
(.f64 d (.f64 d c0))
(.f64 c0 (.f64 d d))
(*.f64 (neg.f64 d) (neg.f64 d))
(*.f64 (fabs.f64 d) (fabs.f64 d))
(*.f64 d d)
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)))
(sqrt.f64 #s(literal -1 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 #s(literal 0 binary64) c0)) (/.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 #s(literal 0 binary64) c0)))
(/.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 #s(literal 0 binary64) 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 #s(literal 0 binary64) c0))
(.f64 (.f64 #s(literal -1 binary64) c0) #s(literal 0 binary64))
(.f64 (.f64 #s(literal 0 binary64) c0) #s(literal -1 binary64))
(.f64 #s(literal 0 binary64) (.f64 (.f64 (/.f64 d (.f64 (*.f64 h w) D)) (/.f64 d D)) c0))
(*.f64 #s(literal 0 binary64) (neg.f64 c0))
(*.f64 #s(literal 0 binary64) c0)
(.f64 #s(literal -1 binary64) (.f64 #s(literal 0 binary64) c0))
(*.f64 c0 #s(literal 0 binary64))
(neg.f64 (*.f64 #s(literal 0 binary64) c0))
(fma.f64 (neg.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D))) c0 (.f64 (.f64 (/.f64 d (.f64 (*.f64 h w) D)) (/.f64 d D)) c0))
(fma.f64 c0 (neg.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D))) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)))
(+.f64 (.f64 (neg.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D))) c0) (.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D)) c0))
(+.f64 (.f64 c0 (neg.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D)))) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (*.f64 D D) h) w)))
(.f64 (.f64 #s(literal -1 binary64) c0) #s(literal 0 binary64))
(.f64 (.f64 #s(literal 0 binary64) c0) #s(literal -1 binary64))
(.f64 #s(literal 0 binary64) (.f64 (.f64 (/.f64 d (.f64 (*.f64 h w) D)) (/.f64 d D)) c0))
(*.f64 #s(literal 0 binary64) (neg.f64 c0))
(*.f64 #s(literal 0 binary64) c0)
(.f64 #s(literal -1 binary64) (.f64 #s(literal 0 binary64) c0))
(*.f64 c0 #s(literal 0 binary64))
(neg.f64 (*.f64 #s(literal 0 binary64) c0))
(fma.f64 (neg.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D))) c0 (.f64 (.f64 (/.f64 d (.f64 (*.f64 h w) D)) (/.f64 d D)) c0))
(fma.f64 c0 (neg.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D))) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w)))
(+.f64 (.f64 (neg.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D))) c0) (.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D)) c0))
(+.f64 (.f64 c0 (neg.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D)))) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (*.f64 D D) h) w)))
#s(literal 0 binary64)
#s(literal 0 binary64)
(.f64 (/.f64 d (.f64 (*.f64 h w) D)) (/.f64 d D))
(.f64 d (/.f64 d (.f64 (.f64 (.f64 D D) h) w)))
(/.f64 (/.f64 (.f64 d d) (.f64 (*.f64 h w) D)) D)
(/.f64 (/.f64 (.f64 d d) (.f64 D D)) (*.f64 h w))
(/.f64 (neg.f64 (.f64 d d)) (neg.f64 (.f64 (.f64 (.f64 D D) h) w)))
(/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64))) h))
(/.f64 (neg.f64 (fma.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64)))) (neg.f64 h))
(/.f64 (fma.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64))) h)
(+.f64 (/.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64)) h) (/.f64 (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w))) h))
(+.f64 (/.f64 (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w))) h) (/.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (*.f64 D D) d)) #s(literal -1/4 binary64)) h))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64)) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64))) (.f64 (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w))) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w))))) (-.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64)) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w)))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w))) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w)))) (.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64)) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64)))) (-.f64 (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w))) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (*.f64 D D) d)) #s(literal -1/4 binary64))))
(fma.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64)))
(fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w))))
(fma.f64 (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64)))
(fma.f64 (.f64 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 w w) (.f64 D D))) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (*.f64 D D) d)) #s(literal -1/4 binary64)))
(fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w))))
(-.f64 (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w))) (.f64 (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (*.f64 D D) d))) #s(literal -1/4 binary64)))
(+.f64 (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w))) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (*.f64 D D) d)) #s(literal -1/4 binary64)))
(+.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64)) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w))))
(*.f64 (/.f64 c0 D) (/.f64 c0 D))
(.f64 c0 (/.f64 c0 (.f64 D D)))
(/.f64 (/.f64 (*.f64 c0 c0) D) D)
(/.f64 (neg.f64 (.f64 c0 c0)) (neg.f64 (.f64 D D)))
(/.f64 (.f64 c0 c0) (.f64 D D))
(*.f64 (neg.f64 c0) (neg.f64 c0))
(*.f64 (fabs.f64 c0) (fabs.f64 c0))
(*.f64 c0 c0)
(*.f64 (neg.f64 D) (neg.f64 D))
(*.f64 (fabs.f64 D) (fabs.f64 D))
(*.f64 D D)
(*.f64 (/.f64 d w) (/.f64 d w))
(.f64 d (/.f64 d (.f64 w w)))
(/.f64 (/.f64 (*.f64 d d) w) w)
(/.f64 (neg.f64 (.f64 d d)) (neg.f64 (.f64 w w)))
(/.f64 (.f64 d d) (.f64 w w))
(*.f64 (neg.f64 w) (neg.f64 w))
(*.f64 (fabs.f64 w) (fabs.f64 w))
(*.f64 w w)
(.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64))
(.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)))
(/.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 D D)) (.f64 (.f64 (.f64 M M) h) h)) (*.f64 d d))
(.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (*.f64 D D) d))
(.f64 (.f64 (.f64 (.f64 M M) h) h) (/.f64 (.f64 D D) (.f64 d d)))
(.f64 (.f64 D D) (/.f64 (.f64 (.f64 (.f64 M M) h) h) (.f64 d d)))
(/.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 (*.f64 M M) h) h) D) D) d) d)
(/.f64 (neg.f64 (.f64 (.f64 (.f64 (.f64 (.f64 M M) h) h) D) D)) (neg.f64 (.f64 d d)))
(/.f64 (.f64 (.f64 (.f64 (.f64 (.f64 M M) h) h) D) D) (.f64 d d))
(.f64 (.f64 (.f64 (.f64 (*.f64 M M) h) h) D) D)
(.f64 (.f64 (.f64 M M) (.f64 D D)) (*.f64 h h))
(.f64 (.f64 (.f64 (.f64 M M) h) h) (*.f64 D D))
(.f64 (.f64 M M) (.f64 (.f64 h h) (*.f64 D D)))
(.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) h))
(.f64 (.f64 M h) (*.f64 M h))
(.f64 (.f64 (*.f64 M M) h) h)
(.f64 (.f64 M M) (*.f64 h h))
(.f64 (.f64 h h) (*.f64 M M))
(.f64 M (.f64 M (*.f64 h h)))
(*.f64 (neg.f64 M) (neg.f64 M))
(*.f64 (fabs.f64 M) (fabs.f64 M))
(*.f64 M M)
(*.f64 (neg.f64 h) (neg.f64 h))
(*.f64 (fabs.f64 h) (fabs.f64 h))
(*.f64 h h)
#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 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (*.f64 d 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 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (*.f64 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 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (.f64 d d)))) (.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 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (*.f64 d d)))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D))) d) d)
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (*.f64 d d))
(.f64 (.f64 d d) (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D))))
(fma.f64 (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64)) (.f64 d d) (.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D)) (*.f64 d d)))
(fma.f64 (.f64 d d) (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64)) (.f64 (.f64 d d) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D))))
(+.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64)) (.f64 d d)) (.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D)) (.f64 d d)))
(+.f64 (.f64 (.f64 d d) (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64))) (.f64 (.f64 d d) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64)) (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64))) (.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D)))) (-.f64 (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))))
(fma.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D) (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (*.f64 d d) d) d))) #s(literal -1/2 binary64)))
(fma.f64 (/.f64 (/.f64 c0 (.f64 D D)) (.f64 h w)) #s(literal 2 binary64) (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (*.f64 d d) d) d))) #s(literal -1/2 binary64)))
(fma.f64 (/.f64 (.f64 D D) c0) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d)) #s(literal -1/2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D)))
(fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D)))
(fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D)))
(fma.f64 #s(literal 2 binary64) (/.f64 (/.f64 c0 (.f64 D D)) (.f64 h w)) (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (*.f64 d d) d) d))) #s(literal -1/2 binary64)))
(-.f64 (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) (/.f64 (/.f64 c0 (.f64 D D)) (.f64 h w))))
(+.f64 (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D)) (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64)))
(+.f64 (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D)))
(.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d)))
(.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d)) (/.f64 (.f64 D D) c0))
(.f64 (.f64 D D) (/.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) w) c0) (.f64 (.f64 (.f64 d d) d) d)))
(/.f64 (.f64 (/.f64 (.f64 D D) c0) (.f64 (.f64 (.f64 M M) h) w)) (.f64 (.f64 (.f64 d d) d) d))
(/.f64 (neg.f64 (.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 D D))) (neg.f64 (.f64 (.f64 (.f64 (*.f64 d d) d) d) c0)))
(/.f64 (.f64 (.f64 D D) (/.f64 (.f64 (.f64 (.f64 M M) h) w) c0)) (.f64 (.f64 (.f64 d d) d) d))
(/.f64 (.f64 (.f64 D D) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) c0)
(/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 D D)) (.f64 (.f64 (.f64 (*.f64 d d) d) d) c0))
(*.f64 D (/.f64 D c0))
(/.f64 (neg.f64 (*.f64 D D)) (neg.f64 c0))
(/.f64 (*.f64 D D) c0)
(.f64 (.f64 (.f64 M M) (/.f64 h (.f64 d d))) (/.f64 w (*.f64 d d)))
(.f64 (.f64 (.f64 M M) h) (/.f64 w (.f64 (.f64 (.f64 d d) d) d)))
(.f64 (.f64 M M) (/.f64 (.f64 h w) (.f64 (.f64 (.f64 d d) d) d)))
(/.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 d d)) (*.f64 d d))
(/.f64 (neg.f64 (.f64 (.f64 (.f64 M M) h) w)) (neg.f64 (.f64 (.f64 (.f64 d d) d) d)))
(/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))
(.f64 (.f64 (*.f64 M M) h) w)
(.f64 (.f64 M M) (*.f64 h w))
(.f64 (.f64 h w) (*.f64 M M))
(.f64 w (.f64 (*.f64 M M) h))
(.f64 (.f64 M M) h)
(.f64 M (.f64 M h))
(.f64 h (.f64 M M))
(.f64 (.f64 (*.f64 d d) d) d)
(.f64 (neg.f64 (.f64 d d)) (neg.f64 (*.f64 d d)))
(.f64 (fabs.f64 (.f64 d d)) (fabs.f64 (*.f64 d d)))
(.f64 (.f64 d d) (*.f64 d d))
(.f64 d (.f64 d (*.f64 d d)))
#s(literal -1/2 binary64)
(.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D))
(.f64 (/.f64 (/.f64 c0 (.f64 D D)) (*.f64 h w)) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (/.f64 c0 (.f64 D D)) (*.f64 h w)))
(/.f64 (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (*.f64 h w) D)) D)
(/.f64 (neg.f64 (.f64 #s(literal 2 binary64) c0)) (neg.f64 (.f64 (.f64 (.f64 D D) h) w)))
(/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 D D) h) w))
(+.f64 (/.f64 (/.f64 c0 (.f64 D D)) (.f64 h w)) (/.f64 (/.f64 c0 (.f64 D D)) (.f64 h w)))
(*.f64 #s(literal 2 binary64) c0)
(*.f64 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 (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) (fma.f64 M (/.f64 (sqrt.f64 #s(literal -1 binary64)) 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 (fma.f64 (fma.f64 (.f64 (/.f64 c0 (.f64 (.f64 D D) (.f64 D D))) (/.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 (.f64 M (.f64 h h)) (.f64 (.f64 (.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64) (/.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)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (*.f64 D D) h) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (fma.f64 (.f64 (/.f64 c0 (.f64 (.f64 D D) (.f64 D D))) (/.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 (.f64 M (.f64 h h)) (.f64 (.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64) (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D))) 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)))) (fma.f64 (fma.f64 (fma.f64 (.f64 (/.f64 (.f64 c0 c0) (.f64 (.f64 (.f64 D D) (.f64 D D)) (.f64 (.f64 D D) (.f64 D D)))) (/.f64 (.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 (.f64 (.f64 w w) (.f64 w w)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 h h) (.f64 h h))) (.f64 (.f64 M M) M)))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 (.f64 (.f64 M (.f64 h h)) (.f64 (.f64 w w) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 D D) (.f64 D D)))) #s(literal 1/2 binary64))) c0 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D))) 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 (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))
#s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64)))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (fma.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (.f64 d d) (.f64 (.f64 w w) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64)))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (fma.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64))))
#s(approx (/ (* c0 c0) (* D D)) (*.f64 (/.f64 c0 D) (/.f64 c0 D)))
#s(approx (* c0 c0) (*.f64 c0 c0))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 D D)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (/.f64 (fma.f64 (.f64 (.f64 c0 c0) (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D))) #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 D D)) (.f64 d d)) #s(literal -1/2 binary64))) c0))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (*.f64 d d) d) d))) #s(literal -1/2 binary64)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (/.f64 (fma.f64 (/.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 h w)) #s(literal 2 binary64) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (*.f64 d d) d) d))) #s(literal -1/2 binary64))) c0))
#s(approx (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))))
#s(approx (/ (* D D) c0) (/.f64 (*.f64 D D) c0))
#s(approx (/ (* 2 c0) (* (* (* h w) D) D)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D)))
#s(approx (* 2 c0) (*.f64 #s(literal 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 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))))) (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) (.f64 c0 c0)) (.f64 (.f64 M M) (/.f64 h (.f64 d d)))) #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 #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 (fma.f64 (.f64 (/.f64 (.f64 D D) (.f64 c0 c0)) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 d d))) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (.f64 (.f64 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) (.f64 c0 c0)) (.f64 (.f64 M M) (/.f64 h (.f64 d d)))) #s(literal -1/4 binary64) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (.f64 w w)))) (*.f64 c0 c0)))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) (.f64 c0 c0)) (/.f64 (.f64 (.f64 (.f64 M M) h) h) (.f64 d d))) #s(literal -1/4 binary64) (/.f64 (.f64 d d) (.f64 (.f64 w w) (.f64 D D)))) (*.f64 c0 c0)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 (.f64 (*.f64 d d) c0) D)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) (.f64 c0 c0)) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 d d))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 d d)) (.f64 (.f64 (*.f64 D D) h) w))) c0))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) (.f64 c0 c0)) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (/.f64 #s(literal 2 binary64) (.f64 (.f64 (*.f64 D D) h) w))) c0))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (.f64 (/.f64 (.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) (.f64 c0 c0)) (.f64 (.f64 M M) (/.f64 h (.f64 d d)))) #s(literal 1/4 binary64) (/.f64 #s(literal 0 binary64) 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 #s(literal 0 binary64) c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (.f64 (fma.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D)) #s(literal -1 binary64) (fma.f64 (.f64 (/.f64 (.f64 D D) (.f64 c0 c0)) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 d d))) #s(literal -1/2 binary64) (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D)))) c0)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (neg.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) (.f64 c0 c0)) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 d d))) #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -2 binary64) (.f64 d d)) (.f64 (.f64 (*.f64 D D) h) w))) c0)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (neg.f64 (.f64 (-.f64 (.f64 (.f64 (/.f64 (.f64 D D) (.f64 c0 c0)) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 D D) h) 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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.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 (fma.f64 (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)) #s(literal 2 binary64) (.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 (* (* (* 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 (* 0 (/ (* d d) (* (* (* h w) D) D))) #s(literal 0 binary64))
#s(approx (/ (* d d) (* (* (* h w) D) D)) (.f64 (/.f64 d (.f64 (*.f64 h w) D)) (/.f64 d D)))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (.f64 d d) h))) (*.f64 w w)))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 h h) (.f64 w w)) (.f64 M M)) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.f64 D D))) (*.f64 w w)))
#s(approx (/ (* d d) (* w w)) (*.f64 (/.f64 d w) (/.f64 d w)))
#s(approx (* w w) (*.f64 w w))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (/.f64 (fma.f64 (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h)) #s(literal 2 binary64) (.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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) (.f64 w w)) (.f64 D D)) (.f64 (.f64 (.f64 (.f64 d d) d) d) c0)) #s(literal -1/2 binary64) (.f64 (/.f64 c0 (.f64 (*.f64 D D) h)) #s(literal 2 binary64))) w))
#s(approx (/ (* (* (* M M) h) w) (* (* d d) (* d d))) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d)))
#s(approx (* (* (* M M) h) w) (.f64 (.f64 (*.f64 M M) h) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 c0 c0) (.f64 (/.f64 d (.f64 (*.f64 h w) D)) (/.f64 d D))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 c0 c0) c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 M (.f64 h h)) (.f64 (.f64 w w) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 D D) (.f64 D D)))) #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 c0 c0) (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D)))))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 M (.f64 h h)) (.f64 (.f64 w w) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 D D) (.f64 D D)))) #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (*.f64 D D) h) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 c0 c0) (.f64 c0 c0)) (.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 (.f64 (.f64 d d) d) d))) (.f64 (.f64 (.f64 (.f64 (.f64 D D) (.f64 D D)) (.f64 (.f64 D D) (.f64 D D))) (.f64 (.f64 M M) M)) (.f64 (.f64 (.f64 (.f64 w w) (.f64 w w)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 h h) (.f64 h h))))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 M (.f64 h h)) (.f64 (.f64 w w) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 D D) (.f64 D D)))) #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (*.f64 D D) h) w))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 D D)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) (.f64 w w)))) w))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 M M) h) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 D D) h) (*.f64 w 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) (fma.f64 (.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 c0 c0) (.f64 (/.f64 d (.f64 (*.f64 h w) D)) (/.f64 d D))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) M) (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 c0 c0) c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 M (.f64 h h)) (.f64 (sqrt.f64 #s(literal -1 binary64)) w)) (.f64 (.f64 D D) (.f64 D D)))) #s(literal 1/4 binary64) (.f64 (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (.f64 d d) h)) #s(literal 1/2 binary64))) 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)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 M (.f64 h h)) (.f64 (sqrt.f64 #s(literal -1 binary64)) w)) (.f64 (.f64 D D) (.f64 D D)))) #s(literal -1/2 binary64) (neg.f64 (.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)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (.f64 #s(literal -1 binary64) (fma.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) h) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 c0 c0) (.f64 c0 c0)) (.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 (.f64 (.f64 d d) d) d))) (.f64 (.f64 (.f64 (.f64 (.f64 D D) (.f64 D D)) (.f64 (.f64 D D) (.f64 D D))) (.f64 (.f64 M M) M)) (.f64 (.f64 (.f64 (.f64 h h) (.f64 h h)) (.f64 w w)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 M (.f64 h h)) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 D D) (.f64 D D)))) #s(literal 1/2 binary64))) w))) w))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (neg.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 D D)) (.f64 (.f64 d d) c0)) #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 (.f64 D D) h) (.f64 w w)))) w)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (neg.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 M M) h) (.f64 (.f64 (.f64 d d) d) d))) #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -2 binary64) c0) (.f64 (.f64 (.f64 D D) h) (*.f64 w 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 (fma.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D 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 (fma.f64 (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) w)) #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 (.f64 M M) h) h) w) (.f64 D D)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) h))
#s(approx h h)
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (/.f64 (fma.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64))) h))
#s(approx (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (.f64 D D) d)) #s(literal -1/4 binary64)))
#s(approx (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) h) d) (/.f64 (*.f64 D D) d)))
#s(approx (* (* (* M M) (* h h)) (* D D)) (.f64 (.f64 (.f64 (.f64 (*.f64 M M) h) h) D) D))
#s(approx (* (* M M) (* h h)) (.f64 (.f64 (*.f64 M M) h) h))
#s(approx (* h h) (*.f64 h h))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (/.f64 (fma.f64 (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) w)) #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 (.f64 M M) h) h) w) (.f64 D D)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) h))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (/.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (.f64 (/.f64 c0 (.f64 (.f64 D D) w)) #s(literal 2 binary64))) h))
#s(approx (* (* M M) h) (.f64 (.f64 M M) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (.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))))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 c0 c0) c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 M (.f64 h h)) (.f64 (.f64 (.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 D D) (.f64 D D)))) #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (.f64 (.f64 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 w w))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (.f64 (fma.f64 (/.f64 (.f64 (.f64 M M) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (.f64 d d) (.f64 (.f64 h h) (*.f64 w w))))) h))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 M M) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (.f64 d d) (.f64 (.f64 h h) (.f64 w w))))) (.f64 h h)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 h h) w) (.f64 D D))) #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) w) (.f64 D D)) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) h))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 M M) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 h h) w) (*.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))))) (fma.f64 (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 c0 c0) c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 M h) (.f64 (.f64 (.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 D D) (.f64 D D)))) #s(literal -1/4 binary64) (.f64 (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w))) #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)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 M h) (.f64 (.f64 w w) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 D D) (.f64 D D)))) #s(literal -1/2 binary64) (neg.f64 (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) w)))) h))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (.f64 #s(literal -1 binary64) (fma.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) w) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 c0 c0) (.f64 c0 c0)) (.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 (.f64 (.f64 d d) d) d))) (.f64 (.f64 (.f64 (.f64 (.f64 D D) (.f64 D D)) (.f64 (.f64 D D) (.f64 D D))) (.f64 (.f64 M M) M)) (.f64 (.f64 (.f64 (.f64 w w) (.f64 w w)) (.f64 h h)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 M (.f64 w w)) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 D D) (.f64 D D)))) #s(literal 1/2 binary64))) h))) h))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (neg.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 M M) (.f64 D D)) (.f64 d d)) #s(literal 1/4 binary64) (neg.f64 (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (.f64 d d) (.f64 (.f64 h h) (*.f64 w w)))))) h)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (neg.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 h h) w) (.f64 D D))) #s(literal -2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) w) (.f64 D D)) (.f64 (.f64 d d) c0)) #s(literal 1/2 binary64))) h)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (neg.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 M M) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -2 binary64) c0) (.f64 (.f64 (.f64 h h) w) (*.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 (fma.f64 (/.f64 (.f64 c0 c0) h) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D))) (.f64 d d)) #s(literal -1/4 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 (fma.f64 (.f64 (/.f64 c0 h) (/.f64 (.f64 d d) w)) #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 D D) (.f64 D D))) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx D D)
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (/.f64 (fma.f64 (/.f64 (.f64 c0 c0) h) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D))) (.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) h) (.f64 (.f64 D D) (.f64 D D))) (.f64 d d)) #s(literal -1/4 binary64) (.f64 (.f64 c0 c0) (.f64 (/.f64 d w) (/.f64 d w)))) (.f64 D D)))
#s(approx (* D D) (*.f64 D D))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (/.f64 (fma.f64 (.f64 (/.f64 c0 h) (/.f64 (.f64 d d) w)) #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 D D) (.f64 D D))) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) (.f64 D D)) (/.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) w) c0) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (.f64 (/.f64 c0 (.f64 h w)) #s(literal 2 binary64))) (*.f64 D D)))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (.f64 (fma.f64 (/.f64 (.f64 c0 c0) (.f64 (.f64 D D) (.f64 D D))) (/.f64 (.f64 d d) (.f64 (.f64 w w) h)) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 M M) h)) (.f64 d d))) (*.f64 D D)))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (fma.f64 (/.f64 (.f64 c0 c0) (.f64 (.f64 D D) (.f64 D D))) (.f64 (/.f64 d w) (/.f64 d w)) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 M M) h) h)) (.f64 d d))) (.f64 D D)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 h w) (.f64 (.f64 D D) (.f64 D D)))) #s(literal 2 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 M M) h) w)) (.f64 (.f64 d d) c0))) (*.f64 D D)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (fma.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) w) c0) (.f64 (.f64 (.f64 d d) d) d)) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 h w) (.f64 (.f64 D D) (.f64 D D))))) (.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 c0 c0) c0) (.f64 (.f64 D D) (.f64 D D))) (/.f64 (.f64 d d) (.f64 (.f64 M (.f64 h h)) (.f64 (.f64 (.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/4 binary64) (/.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)))) (fma.f64 (fma.f64 (.f64 (/.f64 (.f64 c0 c0) (.f64 (.f64 D D) (.f64 D D))) (/.f64 (.f64 d d) (.f64 (.f64 M (.f64 h h)) (.f64 (.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1/2 binary64) (/.f64 (/.f64 c0 (.f64 D D)) (.f64 h w))) (.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)))) (fma.f64 (fma.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 c0 c0)) (.f64 (.f64 (.f64 D D) (.f64 D D)) (.f64 (.f64 D D) (.f64 D D)))) (/.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 (.f64 (.f64 (.f64 (.f64 w w) (.f64 w w)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 h h) (.f64 h h))) (.f64 (.f64 M M) M)))) #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 c0 c0) (.f64 (.f64 D D) (.f64 D D))) (.f64 (.f64 M (.f64 h h)) (.f64 (.f64 w w) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/2 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 (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (/.f64 (fma.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 (.f64 w w) h)) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 D D)) (.f64 (.f64 M M) h))) (.f64 d d)))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (fma.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 w w)) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 D D)) (.f64 (.f64 (.f64 M M) h) h))) (.f64 d d)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (/.f64 (fma.f64 (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 h w))) #s(literal 2 binary64) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 (.f64 (.f64 M M) h) w) c0)) #s(literal -1/2 binary64))) (*.f64 d d)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (/.f64 (fma.f64 (.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 h w))) #s(literal 2 binary64) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 (.f64 (.f64 M M) h) w) c0)) #s(literal -1/2 binary64))) (.f64 (.f64 (*.f64 d d) d) d)))
#s(approx (* (* d d) (* d d)) (.f64 (.f64 (*.f64 d d) 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 (fma.f64 (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) h) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/4 binary64) (/.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.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 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (*.f64 d d)))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (.f64 (fma.f64 (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) h) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/4 binary64) (/.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 (.f64 w w) h))) (.f64 d d)))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (fma.f64 (.f64 (.f64 D D) (/.f64 (.f64 (.f64 (.f64 M M) h) h) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/4 binary64) (/.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 w w))) (.f64 d d)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (*.f64 d d)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (.f64 d d) (.f64 (.f64 w w) h)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 D D)) (.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 (* (sqrt -1) M) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx M M)
#s(approx (* M M) (*.f64 M M))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 D D)) (.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) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 c0 c0) c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 (.f64 D D) (.f64 D D)) (.f64 M M)) (.f64 (.f64 (.f64 (.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))) (.f64 h h)))) #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.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 (fma.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.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 (fma.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 (.f64 D D) (.f64 D D)) (.f64 M M)) (.f64 (.f64 (.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (.f64 h h)))) #s(literal 1/2 binary64) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 c0 c0) (.f64 c0 c0)) (.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 (.f64 (.f64 d d) d) d))) (.f64 (.f64 (.f64 (.f64 (.f64 D D) (.f64 D D)) (.f64 (.f64 D D) (.f64 D D))) (.f64 (.f64 M M) (.f64 M M))) (.f64 (.f64 (.f64 (.f64 w w) (.f64 w w)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 h h) (.f64 h h))))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 (.f64 D D) (.f64 D D)) (.f64 M M)) (.f64 (.f64 (.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (.f64 h h)))) #s(literal 1/2 binary64) (/.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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (.f64 (fma.f64 (.f64 (.f64 D D) (/.f64 h (.f64 d d))) #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 M M) h) (.f64 w w))))) (.f64 M M)))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 h h) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (.f64 d d) (.f64 (.f64 M M) (.f64 w w))))) (.f64 M M)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 D D))) #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 D D) h) w) (.f64 (.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) c0) (/.f64 (.f64 h w) (.f64 (.f64 (.f64 d d) d) d))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 D D)))) (.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 (fma.f64 (/.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.f64 D D)) (.f64 (.f64 (.f64 w w) h) M)) #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/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))))) (neg.f64 (.f64 (fma.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 c0 c0) c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 M (.f64 h h)) (.f64 (.f64 (.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 D D) (.f64 D D)))) #s(literal -1/4 binary64) (.f64 (.f64 (.f64 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (.f64 w w)))) #s(literal 1/2 binary64))) 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)))) (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 (fma.f64 (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) M) (*.f64 h w))) #s(literal -1 binary64) (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 (fma.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 M (.f64 h h)) (.f64 (.f64 w w) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 D D) (.f64 D D)))) #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 d d) c0) (.f64 (.f64 (.f64 D D) h) w))) M) #s(literal -1 binary64) (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 (fma.f64 (/.f64 (fma.f64 (/.f64 c0 (.f64 D D)) (/.f64 (.f64 d d) (.f64 h w)) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 c0 c0) (.f64 c0 c0)) (.f64 (.f64 (.f64 (.f64 d d) d) d) (.f64 (.f64 (.f64 d d) d) d))) (.f64 (.f64 (.f64 (.f64 M M) (.f64 (.f64 h h) (.f64 h h))) (.f64 (.f64 (.f64 w w) (.f64 w w)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (.f64 (.f64 (.f64 D D) (.f64 D D)) (.f64 (.f64 D D) (.f64 D D))))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 (.f64 (.f64 d d) d) d)) (.f64 (.f64 (.f64 (.f64 D D) (.f64 D D)) (.f64 h h)) (.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/2 binary64))) M))) M) #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))) M)))

eval347.0ms (4%)

Memory: -85.5MiB live, 91.4MiB allocated; 620ms collecting garbage
Compiler: Compiled 48 628 to 2 384 computations (95.1% saved)

prune49.0ms (0.6%)

Memory

-18.0MiB live, 86.5MiB allocated; 13ms collecting garbage

Pruning

17 alts after pruning (17 fresh and 0 done)

	Pruned	Kept	Total
New	533	16	549
Fresh	7	1	8
Picked	5	0	5
Done	0	0	0
Total	545	17	562

Accuracy

78.9%

Counts

562 → 17

Alt Table

Click to see full alt table

Status	Accuracy	Program
	40.9%	(/.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)))
	29.2%	(/.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 #s(literal 0 binary64) c0))) (.f64 w #s(literal 2 binary64)))
	39.7%	(.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ ( c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 (.f64 h w) D) D))))
	9.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)))) (fma.f64 (neg.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D))) c0 (.f64 (.f64 (/.f64 d (.f64 (*.f64 h w) D)) (/.f64 d D)) c0))))
	35.6%	(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (.f64 (.f64 (.f64 d d) c0) #s(literal 2 binary64)) (.f64 (.f64 (.f64 D D) h) w))))
	41.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 d) c0)) (.f64 (.f64 (.f64 D h) w) D))))
	35.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 d) c0)) (.f64 (.f64 h w) (.f64 D D)))))
▶	42.1%	(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.f64 (.f64 (.f64 h w) D) D))))
▶	41.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 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (.f64 d d))))
	26.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)))) #s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (/.f64 (fma.f64 (.f64 (.f64 c0 c0) (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D))) #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) w) (.f64 D D)) (.f64 d d)) #s(literal -1/2 binary64))) c0))))
▶	24.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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))))
▶	24.2%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (/.f64 (.f64 c0 c0) h) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D))) (.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
	23.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 M M) h) h) (.f64 (.f64 D D) (.f64 D D))) (.f64 d d)) #s(literal -1/4 binary64) (.f64 (.f64 c0 c0) (.f64 (/.f64 d w) (/.f64 d w)))) (.f64 D D))) h))
	12.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 h h) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (.f64 d d) (.f64 (.f64 M M) (.f64 w w))))) (.f64 M M))) h))
▶	48.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w)))) h))
	29.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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 w w)))))
	19.5%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (.f64 (fma.f64 (/.f64 (.f64 (.f64 M M) (.f64 D D)) (.f64 d d)) #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (.f64 d d) (.f64 (.f64 h h) (*.f64 w w))))) h)))

Compiler

Compiled 2 968 to 1 246 computations (58% saved)

series176.0ms (2%)

Memory

32.4MiB live, 361.6MiB allocated; 28ms collecting garbage

Counts

50 → 204

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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w)))) h))
(/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w)))) h)
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w))))
(.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w)))
(*.f64 (/.f64 c0 D) (/.f64 c0 D))
(/.f64 c0 D)
c0
D
(*.f64 (/.f64 d w) (/.f64 d w))
(/.f64 d w)
d
w
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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
(*.f64 #s(literal 2 binary64) 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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64)))
#s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))
#s(literal 0 binary64)
(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.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 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.f64 (.f64 (.f64 h w) D) D)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.f64 (.f64 (.f64 h w) D) D))
(.f64 #s(literal 2 binary64) (.f64 (*.f64 c0 d) d))
(.f64 (.f64 c0 d) d)
(*.f64 c0 d)
(.f64 (.f64 (*.f64 h w) D) D)
(.f64 (.f64 h w) D)
(*.f64 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)))) (.f64 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 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 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (.f64 d d)))
(.f64 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (.f64 d d))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D)))
(.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D))
(*.f64 d d)
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (/.f64 (.f64 c0 c0) h) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D))) (.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
(/.f64 (fma.f64 (/.f64 (.f64 c0 c0) h) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D))) (.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D))
(fma.f64 (/.f64 (.f64 c0 c0) h) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D))) (.f64 d d)) #s(literal -1/4 binary64)))
(/.f64 (*.f64 c0 c0) h)
(*.f64 c0 c0)
(.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D))) (.f64 d d)) #s(literal -1/4 binary64))
(/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D))) (*.f64 d d))
(.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D)))
(.f64 (.f64 M M) h)
(*.f64 M M)
M
(.f64 (.f64 D D) (*.f64 D D))
(*.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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2)))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #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))))))
#s(approx (* (* (/ c0 D) (/ c0 D)) (* (/ d w) (/ d w))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))))
#s(approx (* (/ c0 D) (/ c0 D)) #s(hole binary64 (/ (pow c0 2) (pow D 2))))
#s(approx (/ c0 D) #s(hole binary64 (/ c0 D)))
#s(approx c0 #s(hole binary64 c0))
#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 (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(hole binary64 0))
#s(approx (/ (* 2 (* (* c0 d) d)) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* (* c0 d) d)) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* c0 d) d) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* c0 d) #s(hole binary64 (* c0 d)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))) c0)))
#s(approx (* (/ 2 (* (* h w) D)) (/ c0 D)) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2)))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2))))))
#s(approx (/ (* c0 c0) h) #s(hole binary64 (/ (pow c0 2) h)))
#s(approx (* c0 c0) #s(hole binary64 (pow c0 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w))))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* c0 (- (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (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 (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* 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))) (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 (* 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 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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) h)))) w)))
#s(approx (/ 2 (* (* h w) D)) #s(hole binary64 (/ 2 (* D (* h w)))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) h)) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* w (+ (* -2 (/ c0 (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (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/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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 h #s(hole 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)))) #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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) w)))) h)))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (pow w 2))) h)))
#s(approx (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4) #s(hole binary64 (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) #s(hole binary64 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))))
#s(approx (* (* (* M M) h) (* (* D D) (* D D))) #s(hole binary64 (* (pow D 4) (* (pow M 2) h))))
#s(approx (* (* M M) h) #s(hole binary64 (* (pow M 2) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow h 2) (+ (* -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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow h 2) (pow w 2))))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow D 4) (pow M 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow h 2) (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* h (+ (* -2 (/ c0 (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 4)))))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow h 2) (pow w 2))))) (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow h 2) (pow w 2)))) (* 1/4 (/ (* (pow D 4) (pow M 2)) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (pow w 2))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #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) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* h w)))) (pow D 2))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (* D D) (* D D)) #s(hole binary64 (pow D 4)))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow D 2) (+ (* -1/4 (/ (* (pow M 2) (pow h 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (pow w 2)))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 4) (* h w))))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow D 2) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* h (pow w 2))))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 2) (* (pow M 2) (pow h 2)))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 2) (pow w 2)))) (pow d 2))))
#s(approx d #s(hole binary64 d))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #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) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #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 4))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 2) (* (pow M 2) h))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 2) (* h (pow w 2))))) (pow d 2))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 4) (* (pow M 2) h))) (/ (* (pow c0 2) (pow d 4)) (* h (pow w 2)))) (pow d 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) (pow h 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow M 2) (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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow M 2) (* h (pow w 2)))))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 4) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow M 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))

Calls

18 calls:

Time	Variable		Point	Expression
11.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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (* (* (/ c0 D) (/ c0 D)) (* (/ d w) (/ d w))) (* (/ c0 D) (/ c0 D)) (/ c0 D) c0 D (* (/ 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))))) (/ c0 (* 2 w)) (* 2 w) 2 (+ (/ (* 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 (* (* 0 (/ (* d d) (* (* (* h w) D) D))) 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 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* c0 d) d)) (* (* (* h w) D) D)) (* 2 (* (* c0 d) d)) (* (* c0 d) d) (* c0 d) (* (* (* h w) D) D) (* (* h w) D) (* h 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)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ 2 (* (* h w) D)) (/ c0 D)) (/ 2 (* (* h w) D)) (* 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 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (/ (* c0 c0) h) (* c0 c0) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4) (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) (* (* (* M M) h) (* (* D D) (* D D))) (* (* M M) h) (* M M) M (* (* D D) (* D D)) (* D D) -1/4)
11.0ms	w	@	-inf	((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (* (* (/ c0 D) (/ c0 D)) (* (/ d w) (/ d w))) (* (/ c0 D) (/ c0 D)) (/ c0 D) c0 D (* (/ 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))))) (/ c0 (* 2 w)) (* 2 w) 2 (+ (/ (* 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 (* (* 0 (/ (* d d) (* (* (* h w) D) D))) 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 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* c0 d) d)) (* (* (* h w) D) D)) (* 2 (* (* c0 d) d)) (* (* c0 d) d) (* c0 d) (* (* (* h w) D) D) (* (* h w) D) (* h 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)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ 2 (* (* h w) D)) (/ c0 D)) (/ 2 (* (* h w) D)) (* 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 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (/ (* c0 c0) h) (* c0 c0) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4) (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) (* (* (* M M) h) (* (* D D) (* D D))) (* (* M M) h) (* M M) M (* (* D D) (* D D)) (* D D) -1/4)
11.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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (* (* (/ c0 D) (/ c0 D)) (* (/ d w) (/ d w))) (* (/ c0 D) (/ c0 D)) (/ c0 D) c0 D (* (/ 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))))) (/ c0 (* 2 w)) (* 2 w) 2 (+ (/ (* 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 (* (* 0 (/ (* d d) (* (* (* h w) D) D))) 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 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* c0 d) d)) (* (* (* h w) D) D)) (* 2 (* (* c0 d) d)) (* (* c0 d) d) (* c0 d) (* (* (* h w) D) D) (* (* h w) D) (* h 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)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ 2 (* (* h w) D)) (/ c0 D)) (/ 2 (* (* h w) D)) (* 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 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (/ (* c0 c0) h) (* c0 c0) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4) (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) (* (* (* M M) h) (* (* D D) (* D D))) (* (* M M) h) (* M M) M (* (* D D) (* D D)) (* D D) -1/4)
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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (* (* (/ c0 D) (/ c0 D)) (* (/ d w) (/ d w))) (* (/ c0 D) (/ c0 D)) (/ c0 D) c0 D (* (/ 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))))) (/ c0 (* 2 w)) (* 2 w) 2 (+ (/ (* 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 (* (* 0 (/ (* d d) (* (* (* h w) D) D))) 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 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* c0 d) d)) (* (* (* h w) D) D)) (* 2 (* (* c0 d) d)) (* (* c0 d) d) (* c0 d) (* (* (* h w) D) D) (* (* h w) D) (* h 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)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ 2 (* (* h w) D)) (/ c0 D)) (/ 2 (* (* h w) D)) (* 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 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (/ (* c0 c0) h) (* c0 c0) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4) (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) (* (* (* M M) h) (* (* D D) (* D D))) (* (* M M) h) (* M M) M (* (* D D) (* D D)) (* D D) -1/4)
10.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))))) (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (* (* (/ c0 D) (/ c0 D)) (* (/ d w) (/ d w))) (* (/ c0 D) (/ c0 D)) (/ c0 D) c0 D (* (/ 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))))) (/ c0 (* 2 w)) (* 2 w) 2 (+ (/ (* 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 (* (* 0 (/ (* d d) (* (* (* h w) D) D))) 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 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* c0 d) d)) (* (* (* h w) D) D)) (* 2 (* (* c0 d) d)) (* (* c0 d) d) (* c0 d) (* (* (* h w) D) D) (* (* h w) D) (* h 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)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ 2 (* (* h w) D)) (/ c0 D)) (/ 2 (* (* h w) D)) (* 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 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (/ (* c0 c0) h) (* c0 c0) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4) (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) (* (* (* M M) h) (* (* D D) (* D D))) (* (* M M) h) (* M M) M (* (* D D) (* D D)) (* D D) -1/4)

rewrite230.0ms (2.6%)

Memory

20.9MiB live, 326.7MiB allocated; 48ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1273	16697
0	1331	14159
1	7420	14159
0	8500	13772

Stop Event

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

Counts

254 → 342

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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w)))) h))
(/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w)))) h)
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w))))
(.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (*.f64 (/.f64 d w) (/.f64 d w)))
(*.f64 (/.f64 c0 D) (/.f64 c0 D))
(/.f64 c0 D)
c0
D
(*.f64 (/.f64 d w) (/.f64 d w))
(/.f64 d w)
d
w
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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
(*.f64 #s(literal 2 binary64) 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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64)))
#s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))
#s(literal 0 binary64)
(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.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 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.f64 (.f64 (.f64 h w) D) D)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.f64 (.f64 (.f64 h w) D) D))
(.f64 #s(literal 2 binary64) (.f64 (*.f64 c0 d) d))
(.f64 (.f64 c0 d) d)
(*.f64 c0 d)
(.f64 (.f64 (*.f64 h w) D) D)
(.f64 (.f64 h w) D)
(*.f64 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)))) (.f64 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 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 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (.f64 d d)))
(.f64 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (.f64 d d))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D)))
(.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D))
(*.f64 d d)
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (/.f64 (.f64 c0 c0) h) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D))) (.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D)))
(/.f64 (fma.f64 (/.f64 (.f64 c0 c0) h) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D))) (.f64 d d)) #s(literal -1/4 binary64))) (*.f64 D D))
(fma.f64 (/.f64 (.f64 c0 c0) h) (.f64 (/.f64 d w) (/.f64 d w)) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D))) (.f64 d d)) #s(literal -1/4 binary64)))
(/.f64 (*.f64 c0 c0) h)
(*.f64 c0 c0)
(.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D))) (.f64 d d)) #s(literal -1/4 binary64))
(/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D))) (*.f64 d d))
(.f64 (.f64 (.f64 M M) h) (.f64 (.f64 D D) (.f64 D D)))
(.f64 (.f64 M M) h)
(*.f64 M M)
M
(.f64 (.f64 D D) (*.f64 D D))
(*.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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2)))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #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))))))
#s(approx (* (* (/ c0 D) (/ c0 D)) (* (/ d w) (/ d w))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))))
#s(approx (* (/ c0 D) (/ c0 D)) #s(hole binary64 (/ (pow c0 2) (pow D 2))))
#s(approx (/ c0 D) #s(hole binary64 (/ c0 D)))
#s(approx c0 #s(hole binary64 c0))
#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 (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(hole binary64 0))
#s(approx (/ (* 2 (* (* c0 d) d)) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* (* c0 d) d)) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* c0 d) d) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* c0 d) #s(hole binary64 (* c0 d)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))) c0)))
#s(approx (* (/ 2 (* (* h w) D)) (/ c0 D)) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2)))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2))))))
#s(approx (/ (* c0 c0) h) #s(hole binary64 (/ (pow c0 2) h)))
#s(approx (* c0 c0) #s(hole binary64 (pow c0 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w))))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* c0 (- (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (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 (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* 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))) (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 (* 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 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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) h)))) w)))
#s(approx (/ 2 (* (* h w) D)) #s(hole binary64 (/ 2 (* D (* h w)))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) h)) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* w (+ (* -2 (/ c0 (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (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/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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 h #s(hole 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)))) #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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) w)))) h)))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (pow w 2))) h)))
#s(approx (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4) #s(hole binary64 (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) #s(hole binary64 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))))
#s(approx (* (* (* M M) h) (* (* D D) (* D D))) #s(hole binary64 (* (pow D 4) (* (pow M 2) h))))
#s(approx (* (* M M) h) #s(hole binary64 (* (pow M 2) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow h 2) (+ (* -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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow h 2) (pow w 2))))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow D 4) (pow M 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow h 2) (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* h (+ (* -2 (/ c0 (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 4)))))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow h 2) (pow w 2))))) (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow h 2) (pow w 2)))) (* 1/4 (/ (* (pow D 4) (pow M 2)) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (pow w 2))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #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) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* h w)))) (pow D 2))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (* D D) (* D D)) #s(hole binary64 (pow D 4)))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow D 2) (+ (* -1/4 (/ (* (pow M 2) (pow h 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (pow w 2)))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 4) (* h w))))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow D 2) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* h (pow w 2))))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 2) (* (pow M 2) (pow h 2)))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 2) (pow w 2)))) (pow d 2))))
#s(approx d #s(hole binary64 d))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #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) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #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 4))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 2) (* (pow M 2) h))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 2) (* h (pow w 2))))) (pow d 2))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 4) (* (pow M 2) h))) (/ (* (pow c0 2) (pow d 4)) (* h (pow w 2)))) (pow d 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) (pow h 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow M 2) (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 (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (/ (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (* D D)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow M 2) (* h (pow w 2)))))))))
#s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 4) h) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow M 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))

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

eval77.0ms (0.9%)

Memory: 1.1MiB live, 107.4MiB allocated; 52ms collecting garbage
Compiler: Compiled 47 320 to 2 102 computations (95.6% saved)

prune58.0ms (0.7%)

Memory

-31.7MiB live, 117.3MiB allocated; 28ms collecting garbage

Pruning

23 alts after pruning (23 fresh and 0 done)

	Pruned	Kept	Total
New	465	19	484
Fresh	8	4	12
Picked	5	0	5
Done	0	0	0
Total	478	23	501

Accuracy

80.4%

Counts

501 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
	40.9%	(/.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)))
▶	39.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 d d) #s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64)))))) (*.f64 w #s(literal 2 binary64)))
	29.2%	(/.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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64)))) (*.f64 w #s(literal 2 binary64)))
	39.7%	(.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ ( c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 d d) c0)) (.f64 (.f64 (.f64 h w) D) D))))
▶	42.1%	(.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ ( c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.f64 (.f64 (.f64 h w) D) D))))
▶	41.4%	(.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 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (.f64 d d))))
▶	24.6%	(.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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))))
	9.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)))) (fma.f64 (neg.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D))) c0 (.f64 (.f64 (/.f64 d (.f64 (*.f64 h w) D)) (/.f64 d D)) c0))))
	44.1%	(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.f64 (.f64 (.f64 D h) w) D))))
	38.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 c0 d) d)) (.f64 (.f64 (.f64 D D) h) w))))
	45.7%	(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (.f64 (.f64 #s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64))) d) d)))
	26.2%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) h) (/.f64 (.f64 (.f64 (.f64 D D) D) D) (.f64 d d))) #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 c0 c0) h) (.f64 (/.f64 d w) (/.f64 d w)))) 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))))) (/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.f64 D D)) (*.f64 w w))) h))
	38.8%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 d d)) (.f64 w w))) h))
	30.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.f64 (.f64 w w) (.f64 D D)))) h))
	46.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (/.f64 (.f64 (/.f64 c0 D) c0) D) (*.f64 (/.f64 d w) (/.f64 d w)))) h))
▶	55.5%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 d w)) (*.f64 (/.f64 c0 D) (/.f64 d w)))) h))
	47.2%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* 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 (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 (*.f64 (/.f64 d w) d) w))) h))
	43.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 d (/.f64 d (.f64 w w))))) h))
	51.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (*.f64 (/.f64 c0 D) (/.f64 c0 D)) (/.f64 d w)) (/.f64 d w))) h))
	41.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 c0 (/.f64 c0 (.f64 D D))) (.f64 (/.f64 d w) (/.f64 d w)))) h))
	38.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 #s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (.f64 (/.f64 (.f64 c0 c0) h) (.f64 (/.f64 d w) (/.f64 d w)))) (.f64 D D)))
	29.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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 w w)))))

Compiler

Compiled 4 146 to 1 722 computations (58.5% saved)

series150.0ms (1.7%)

Memory

22.6MiB live, 213.2MiB allocated; 8ms collecting garbage

Counts

43 → 325

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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 d w)) (*.f64 (/.f64 c0 D) (/.f64 d w)))) h))
(/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 d w)) (*.f64 (/.f64 c0 D) (/.f64 d w)))) h)
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 d w)) (*.f64 (/.f64 c0 D) (/.f64 d w))))
(.f64 (.f64 (/.f64 c0 D) (/.f64 d w)) (*.f64 (/.f64 c0 D) (/.f64 d w)))
(*.f64 (/.f64 c0 D) (/.f64 d w))
(/.f64 c0 D)
c0
D
(/.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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))))
(/.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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64)))
#s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))
#s(literal 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 c0 d) d)) (.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 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.f64 (.f64 (.f64 h w) D) D)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.f64 (.f64 (.f64 h w) D) D))
(.f64 #s(literal 2 binary64) (.f64 (*.f64 c0 d) d))
#s(literal 2 binary64)
(.f64 (.f64 c0 d) d)
(*.f64 c0 d)
(.f64 (.f64 (*.f64 h w) D) D)
(.f64 (.f64 h w) D)
(*.f64 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 d d) #s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64)))))) (*.f64 w #s(literal 2 binary64)))
(.f64 c0 #s(approx (+ (/ ( c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (.f64 (.f64 d d) #s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (.f64 (.f64 d d) #s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64)))))
(.f64 (.f64 d d) #s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64))))
(*.f64 d d)
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64)))
(.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64))
(/.f64 c0 (.f64 (.f64 (*.f64 h w) D) D))
(*.f64 w #s(literal 2 binary64))
(.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ ( c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (.f64 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 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 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (.f64 d d)))
(.f64 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (.f64 d d))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D)))
(.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) 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 (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2)))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #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))))))
#s(approx (* (* (/ c0 D) (/ d w)) (* (/ c0 D) (/ d w))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))))
#s(approx (* (/ c0 D) (/ d w)) #s(hole binary64 (/ (* c0 d) (* D w))))
#s(approx (/ c0 D) #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 (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(hole binary64 0))
#s(approx (/ (* 2 (* (* c0 d) d)) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* (* c0 d) d)) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* c0 d) d) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* c0 d) #s(hole binary64 (* c0 d)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (* c0 (sqrt -1)))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (+ (* 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 (+ (/ (* c0 (* d d)) (* (* 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 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))) c0)))
#s(approx (* (/ c0 (* (* (* h w) D) D)) 2) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (/ c0 (* (* (* h w) D) D)) #s(hole binary64 (/ c0 (* (pow D 2) (* h w)))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (* h w) D)) (/ c0 D)) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 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 (/ (* (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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (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 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (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 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* c0 (- (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w)))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* 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))) (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 (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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)))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6))))))) w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10))))))))) w)))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) h)))) w)))
#s(approx (* w 2) #s(hole binary64 (* 2 w)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (* h w) D)) #s(hole binary64 (/ 2 (* 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))))) #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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* w (+ (* -2 (/ c0 (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 4)))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) h)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) h)))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) w)))) h)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow h 2) (+ (* -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 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* h (+ (* -2 (/ c0 (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 4)))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (pow w 2))) (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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) (pow D 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) (pow D 2))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* h w)))) (pow D 2))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow D 2) (+ (* -1/4 (/ (* (pow M 2) (pow h 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (pow w 2)))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 4) (* h w))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 2) (* (pow M 2) (pow h 2)))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 2) (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/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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (* c0 (sqrt -1))) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (* c0 (sqrt -1))) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (* d d) #s(hole binary64 (pow d 2)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #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 4))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 4))) (/ (pow c0 2) (* (pow D 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 (* (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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 12)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10)))))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) (pow h 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow M 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 (* 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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))

Calls

18 calls:

Time	Variable		Point	Expression
10.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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (* (* (/ c0 D) (/ d w)) (* (/ c0 D) (/ d w))) (* (/ c0 D) (/ d w)) (/ c0 D) c0 D (/ 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)))) (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) 0 (* (/ c0 (+ w w)) (+ (/ (* 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 (* (* c0 d) d)) (* (* (* h w) D) D)) (* 2 (* (* c0 d) d)) 2 (* (* c0 d) d) (* c0 d) (* (* (* h w) D) D) (* (* h w) D) (* h w) (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ c0 (* (* (* h w) D) D)) 2) (/ c0 (* (* (* h w) D) D)) (* w 2) (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ 2 (* (* h w) D)) (/ c0 D)) (/ 2 (* (* h w) D)))
9.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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (* (* (/ c0 D) (/ d w)) (* (/ c0 D) (/ d w))) (* (/ c0 D) (/ d w)) (/ c0 D) c0 D (/ 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)))) (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) 0 (* (/ c0 (+ w w)) (+ (/ (* 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 (* (* c0 d) d)) (* (* (* h w) D) D)) (* 2 (* (* c0 d) d)) 2 (* (* c0 d) d) (* c0 d) (* (* (* h w) D) D) (* (* h w) D) (* h w) (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ c0 (* (* (* h w) D) D)) 2) (/ c0 (* (* (* h w) D) D)) (* w 2) (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ 2 (* (* h w) D)) (/ c0 D)) (/ 2 (* (* h w) D)))
9.0ms	d	@	0	((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (* (* (/ c0 D) (/ d w)) (* (/ c0 D) (/ d w))) (* (/ c0 D) (/ d w)) (/ c0 D) c0 D (/ 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)))) (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) 0 (* (/ c0 (+ w w)) (+ (/ (* 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 (* (* c0 d) d)) (* (* (* h w) D) D)) (* 2 (* (* c0 d) d)) 2 (* (* c0 d) d) (* c0 d) (* (* (* h w) D) D) (* (* h w) D) (* h w) (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ c0 (* (* (* h w) D) D)) 2) (/ c0 (* (* (* h w) D) D)) (* w 2) (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ 2 (* (* h w) D)) (/ c0 D)) (/ 2 (* (* h w) D)))
8.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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (* (* (/ c0 D) (/ d w)) (* (/ c0 D) (/ d w))) (* (/ c0 D) (/ d w)) (/ c0 D) c0 D (/ 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)))) (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) 0 (* (/ c0 (+ w w)) (+ (/ (* 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 (* (* c0 d) d)) (* (* (* h w) D) D)) (* 2 (* (* c0 d) d)) 2 (* (* c0 d) d) (* c0 d) (* (* (* h w) D) D) (* (* h w) D) (* h w) (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ c0 (* (* (* h w) D) D)) 2) (/ c0 (* (* (* h w) D) D)) (* w 2) (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ 2 (* (* h w) D)) (/ c0 D)) (/ 2 (* (* h w) D)))
8.0ms	D	@	0	((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (* (* (/ c0 D) (/ d w)) (* (/ c0 D) (/ d w))) (* (/ c0 D) (/ d w)) (/ c0 D) c0 D (/ 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)))) (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) 0 (* (/ c0 (+ w w)) (+ (/ (* 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 (* (* c0 d) d)) (* (* (* h w) D) D)) (* 2 (* (* c0 d) d)) 2 (* (* c0 d) d) (* c0 d) (* (* (* h w) D) D) (* (* h w) D) (* h w) (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ c0 (* (* (* h w) D) D)) 2) (/ c0 (* (* (* h w) D) D)) (* w 2) (* (/ c0 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* (/ 2 (* (* h w) D)) (/ c0 D)) (/ 2 (* (* h w) D)))

rewrite270.0ms (3.1%)

Memory

-19.7MiB live, 212.4MiB allocated; 22ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1550	31439
0	1592	26678
0	8122	25878

Stop Event

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

Counts

368 → 327

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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 d w)) (*.f64 (/.f64 c0 D) (/.f64 d w)))) h))
(/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 d w)) (*.f64 (/.f64 c0 D) (/.f64 d w)))) h)
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 d w)) (*.f64 (/.f64 c0 D) (/.f64 d w))))
(.f64 (.f64 (/.f64 c0 D) (/.f64 d w)) (*.f64 (/.f64 c0 D) (/.f64 d w)))
(*.f64 (/.f64 c0 D) (/.f64 d w))
(/.f64 c0 D)
c0
D
(/.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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))))
(/.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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64)))
#s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))
#s(literal 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 c0 d) d)) (.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 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.f64 (.f64 (.f64 h w) D) D)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.f64 (.f64 (.f64 h w) D) D))
(.f64 #s(literal 2 binary64) (.f64 (*.f64 c0 d) d))
#s(literal 2 binary64)
(.f64 (.f64 c0 d) d)
(*.f64 c0 d)
(.f64 (.f64 (*.f64 h w) D) D)
(.f64 (.f64 h w) D)
(*.f64 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 d d) #s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64)))))) (*.f64 w #s(literal 2 binary64)))
(.f64 c0 #s(approx (+ (/ ( c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (.f64 (.f64 d d) #s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (.f64 (.f64 d d) #s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64)))))
(.f64 (.f64 d d) #s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64))))
(*.f64 d d)
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64)))
(.f64 (/.f64 c0 (.f64 (.f64 (.f64 h w) D) D)) #s(literal 2 binary64))
(/.f64 c0 (.f64 (.f64 (*.f64 h w) D) D))
(*.f64 w #s(literal 2 binary64))
(.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ ( c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (.f64 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 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 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (.f64 d d)))
(.f64 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 h w) D)) (/.f64 c0 D))) (.f64 d d))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D)))
(.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 h 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(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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2)))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #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))))))
#s(approx (* (* (/ c0 D) (/ d w)) (* (/ c0 D) (/ d w))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))))
#s(approx (* (/ c0 D) (/ d w)) #s(hole binary64 (/ (* c0 d) (* D w))))
#s(approx (/ c0 D) #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 (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(hole binary64 0))
#s(approx (/ (* 2 (* (* c0 d) d)) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* (* c0 d) d)) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* c0 d) d) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* c0 d) #s(hole binary64 (* c0 d)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (* c0 (sqrt -1)))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (+ (* 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 (+ (/ (* c0 (* d d)) (* (* 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 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))) c0)))
#s(approx (* (/ c0 (* (* (* h w) D) D)) 2) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (/ c0 (* (* (* h w) D) D)) #s(hole binary64 (/ c0 (* (pow D 2) (* h w)))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (* h w) D)) (/ c0 D)) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))))
#s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 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 (/ (* (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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (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 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (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 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* 2 (/ c0 (* (pow D 2) (* h w))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* c0 (- (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w)))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* 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))) (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 (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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)))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6))))))) w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10))))))))) w)))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) h)))) w)))
#s(approx (* w 2) #s(hole binary64 (* 2 w)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (* h w) D)) #s(hole binary64 (/ 2 (* 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))))) #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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* w (+ (* -2 (/ c0 (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 4)))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) h)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) h)))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) w)))) h)))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow h 2) (+ (* -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 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ w w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* -1 (* h (+ (* -2 (/ c0 (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 4)))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (pow w 2))) (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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) (pow D 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) (pow D 2))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* h w)))) (pow D 2))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow D 2) (+ (* -1/4 (/ (* (pow M 2) (pow h 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (pow w 2)))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 4) (* h w))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (/ (+ (* -1/4 (* (pow D 2) (* (pow M 2) (pow h 2)))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 2) (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/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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (* c0 (sqrt -1))) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (* c0 (sqrt -1))) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (* d d) #s(hole binary64 (pow d 2)))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #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 4))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 4))) (/ (pow c0 2) (* (pow D 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 (* (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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 12)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10)))))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) h) #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 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) #s(hole binary64 (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) (pow h 2)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* (pow M 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 (* 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 (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* 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/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (* (* d d) (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D)))) #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 (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (* (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (* d d)) #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 (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w 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)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w 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/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))

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

eval43.0ms (0.5%)

Memory: 35.6MiB live, 81.0MiB allocated; 4ms collecting garbage
Compiler: Compiled 42 954 to 1 790 computations (95.8% saved)

prune112.0ms (1.3%)

Memory

-26.3MiB live, 87.6MiB allocated; 68ms collecting garbage

Pruning

21 alts after pruning (20 fresh and 1 done)

	Pruned	Kept	Total
New	415	12	427
Fresh	10	8	18
Picked	4	1	5
Done	0	0	0
Total	429	21	450

Accuracy

80.4%

Counts

450 → 21

Alt Table

Click to see full alt table

Status	Accuracy	Program
	41.4%	(/.f64 (.f64 c0 #s(approx (+ (/ ( c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (.f64 (.f64 d d) #s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 c0 (.f64 (.f64 h (.f64 w D)) D)) #s(literal 2 binary64)))))) (*.f64 w #s(literal 2 binary64)))
	45.0%	(/.f64 (.f64 c0 #s(approx (+ (/ ( c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (.f64 d (.f64 d #s(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (/.f64 (.f64 c0 #s(literal 2 binary64)) (.f64 (.f64 (.f64 h w) D) D))))))) (*.f64 w #s(literal 2 binary64)))
	29.2%	(/.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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64)))) (*.f64 w #s(literal 2 binary64)))
	44.4%	(.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 c0 d) d)) (.f64 (.f64 h (.f64 w D)) D))))
	38.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 (.f64 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) #s(approx ( (* (* h w) D) D) (.f64 (.f64 (*.f64 D D) h) w)))))
	47.2%	(.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(approx (+ (* (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (.f64 (/.f64 #s(literal 2 binary64) (.f64 (*.f64 h w) D)) (/.f64 c0 D))) d) d)))
	39.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 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 h w) D) D))) (*.f64 d d))))
✓	24.6%	(.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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))))
	9.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)))) (fma.f64 (neg.f64 (.f64 (/.f64 d (.f64 (.f64 h w) D)) (/.f64 d D))) c0 (.f64 (.f64 (/.f64 d (.f64 (*.f64 h w) D)) (/.f64 d D)) c0))))
	29.5%	#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) (.f64 (.f64 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 w w)))))
	55.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))))) (/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (*.f64 (/.f64 c0 D) (/.f64 d w)) (/.f64 c0 D)) (/.f64 d w))) h))
	26.2%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) h) (/.f64 (.f64 (.f64 (.f64 D D) D) D) (.f64 d d))) #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 c0 c0) h) (.f64 (/.f64 d w) (/.f64 d w)))) D) D))
	30.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.f64 w w)) (*.f64 D D))) h))
	38.8%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (.f64 (.f64 (/.f64 c0 D) (/.f64 c0 D)) (.f64 d d)) (.f64 w w))) h))
	30.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.f64 (.f64 w w) (.f64 D D)))) h))
	54.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (/.f64 (.f64 (/.f64 c0 D) d) w) (*.f64 (/.f64 c0 D) (/.f64 d w)))) h))
	46.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (/.f64 (.f64 (/.f64 c0 D) c0) D) (*.f64 (/.f64 d w) (/.f64 d w)))) h))
	52.5%	#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (/.f64 (.f64 c0 d) (.f64 D w)) (.f64 (/.f64 c0 D) (/.f64 d w)))) h))
	53.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 (/.f64 c0 D) (/.f64 d w)) (.f64 c0 (/.f64 d (.f64 D w))))) h))
	41.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (.f64 (.f64 c0 (/.f64 c0 (.f64 D D))) (.f64 (/.f64 d w) (/.f64 d w)))) h))
	38.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 #s(approx (+ (* (/ (* c0 c0) h) (* (/ d w) (/ d w))) (* (/ (* (* (* M M) h) (* (* D D) (* D D))) (* d d)) -1/4)) (.f64 (/.f64 (.f64 c0 c0) h) (.f64 (/.f64 d w) (/.f64 d w)))) (.f64 D D)))

Compiler

Compiled 7 374 to 1 263 computations (82.9% saved)

regimes227.0ms (2.6%)

Memory

-12.2MiB live, 225.5MiB allocated; 25ms collecting garbage

Counts

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

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

Calls

10 calls:

59.0ms	d
36.0ms	(*.f64 D D)
19.0ms	h
19.0ms	w
16.0ms	M

Results

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

Compiler

Compiled 67 to 78 computations (-16.4% saved)

regimes15.0ms (0.2%)

Memory

-17.1MiB live, 29.5MiB allocated; 1ms collecting garbage

Counts

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

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

Calls

1 calls:

12.0ms

Results

Accuracy	Segments	Branch
57.5%	2	`d`

Compiler

Compiled 1 to 6 computations (-500% saved)

regimes108.0ms (1.2%)

Memory

28.9MiB live, 127.1MiB allocated; 6ms collecting garbage

Counts

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

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

Calls

10 calls:

36.0ms	D
9.0ms	c0
8.0ms	w
8.0ms	d
8.0ms	M

Results

Accuracy	Segments	Branch
53.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)))))`
45.7%	1	`(*.f64 M M)`
45.7%	1	`(*.f64 D D)`
45.7%	1	`D`
45.7%	1	`M`
51.4%	4	`w`
45.7%	1	`(*.f64 d d)`
50.2%	3	`c0`
45.7%	1	`h`
51.8%	3	`d`

Compiler

Compiled 67 to 78 computations (-16.4% saved)

regimes5.0ms (0.1%)

Memory

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

Counts

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

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

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
53.4%	2	`(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (.f64 D D))) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (.f64 D D))) (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (.f64 D D)))) (*.f64 M M)))))`

Compiler

Compiled 52 to 21 computations (59.6% saved)

regimes6.0ms (0.1%)

Memory

-35.8MiB live, 11.6MiB allocated; 2ms 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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))))
(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64)))) (*.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 #s(literal 0 binary64) c0))) (.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 (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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) (.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))))) (/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.f64 (.f64 w w) (.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.f64 D D)) (*.f64 w w))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.f64 w w)) (*.f64 D D))) 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 #s(approx (+ ( (* (/ (* D D) c0) (/ (* (* (* M M) h) w) (* (* d d) (* d d)))) -1/2) (/ (* 2 c0) (* (* (* h w) D) D))) (/.f64 (.f64 #s(literal 2 binary64) c0) (.f64 (.f64 (.f64 h w) D) D))) (*.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 (.f64 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) #s(approx ( (* (* h w) D) D) (.f64 (.f64 (*.f64 D D) h) w)))))
(.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 c0 d) d)) (.f64 (.f64 h (.f64 w D)) D))))
(.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ ( c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 c0 d) d)) (.f64 (.f64 (.f64 h w) D) D))))

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

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
53.4%	2	`(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (.f64 D D))) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (.f64 D D))) (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (.f64 D D)))) (*.f64 M M)))))`

Compiler

Compiled 52 to 21 computations (59.6% saved)

regimes7.0ms (0.1%)

Memory

13.2MiB live, 13.2MiB allocated; 0ms 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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))))
(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64)))) (*.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 #s(literal 0 binary64) c0))) (.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 (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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) (.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))))) (/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.f64 (.f64 w w) (.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.f64 D D)) (*.f64 w w))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.f64 w w)) (*.f64 D D))) 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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 d d)) (*.f64 w w)) (*.f64 D D))) h))

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

Calls

2 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
38.0%	2	`d`
48.7%	2	`(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (.f64 D D))) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (.f64 D D))) (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (.f64 D D)))) (*.f64 M M)))))`

Compiler

Compiled 53 to 27 computations (49.1% saved)

regimes3.0ms (0%)

Memory

5.1MiB live, 5.1MiB allocated; 0ms 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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))))
(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64)))) (*.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 #s(literal 0 binary64) c0))) (.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 (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 c0 c0) (/.f64 (.f64 d d) (.f64 (.f64 (.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (* w 2)) (.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))))) (/.f64 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.f64 (.f64 w w) (.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (/.f64 (.f64 (.f64 c0 c0) (.f64 d d)) (.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 #s(approx (+ (* (/ (* c0 c0) (* D D)) (/ (* d d) (* w w))) (* (/ (* (* (* M M) (* h h)) (* D D)) (* d d)) -1/4)) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 d d)) (*.f64 (*.f64 w w) (*.f64 D D)))) h))

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

Calls

1 calls:

2.0ms

(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))

Results

Accuracy	Segments	Branch
48.7%	2	`(.f64 (/.f64 c0 (.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (.f64 D D))) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (.f64 D D))) (/.f64 (.f64 c0 (.f64 d d)) (.f64 (.f64 w h) (.f64 D D)))) (*.f64 M M)))))`

Compiler

Compiled 52 to 21 computations (59.6% saved)

regimes8.0ms (0.1%)

Memory

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

Counts

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

Outputs

#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d 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)))))

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

Calls

3 calls:

3.0ms

2.0ms

c0

2.0ms

(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))

Results

Accuracy	Segments	Branch
38.1%	3	`w`
39.8%	3	`c0`
47.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 54 to 33 computations (38.9% saved)

regimes21.0ms (0.2%)

Memory

-4.8MiB live, 42.1MiB allocated; 1ms collecting garbage

Counts

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

Outputs

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

Calls

10 calls:

3.0ms	M
2.0ms	D
2.0ms	h
2.0ms	w
2.0ms	d

Results

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

regimes13.0ms (0.2%)

Memory

-17.7MiB live, 29.7MiB allocated; 1ms 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)))) #s(approx (neg (* (* 0 (/ (* d d) (* (* (* h w) D) D))) c0)) #s(literal 0 binary64))))

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

Calls

10 calls:

2.0ms	(*.f64 D D)
1.0ms	M
1.0ms	w
1.0ms	c0
1.0ms	h

Results

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

bsearch27.0ms (0.3%)

Memory

-20.6MiB live, 29.1MiB allocated; 2ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
22.0ms	6.107038263119327e+255	3.0860222297655226e+256

Samples

5.0ms	21×	2	valid
5.0ms	14×	3	valid
4.0ms	48×	0	valid
2.0ms	13×	1	valid
0.0ms	2×	0	invalid

Compiler

Compiled 1 105 to 474 computations (57.1% saved)

Precisions

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

ival-mult!: 6.0ms (45% of total)

ival-div!: 3.0ms (22.5% of total)

adjust: 2.0ms (15% of total)

ival-sqrt: 2.0ms (15% of total)

ival-sub!: 0.0ms (0% of total)

ival-add!: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	6.107038263119327e+255	3.0860222297655226e+256

Compiler

Compiled 1 105 to 492 computations (55.5% saved)

bsearch1.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)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB 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.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)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB 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

0.9MiB live, 0.9MiB 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)

derivations288.0ms (3.3%)

Memory

36.9MiB live, 275.6MiB allocated; 21ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 810 to 141 computations (92.2% saved)

preprocess87.0ms (1%)

Memory

-31.2MiB live, 112.2MiB allocated; 10ms collecting garbage

Remove

(abs M)

(abs d)

(abs D)

Compiler

Compiled 15 300 to 4 102 computations (73.2% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze832.0ms (9.5%)

sample3.9s (44.4%)

explain308.0ms (3.5%)

preprocess240.0ms (2.8%)

eval0.0ms (0%)

prune1.0ms (0%)

series152.0ms (1.7%)

rewrite192.0ms (2.2%)

eval25.0ms (0.3%)

prune45.0ms (0.5%)

series502.0ms (5.8%)

rewrite223.0ms (2.6%)

eval347.0ms (4%)

prune49.0ms (0.6%)

series176.0ms (2%)

rewrite230.0ms (2.6%)

eval77.0ms (0.9%)

prune58.0ms (0.7%)

series150.0ms (1.7%)

rewrite270.0ms (3.1%)

eval43.0ms (0.5%)

prune112.0ms (1.3%)

regimes227.0ms (2.6%)

regimes15.0ms (0.2%)

regimes108.0ms (1.2%)

regimes5.0ms (0.1%)

regimes6.0ms (0.1%)

regimes7.0ms (0.1%)

regimes3.0ms (0%)

regimes8.0ms (0.1%)

regimes21.0ms (0.2%)

regimes13.0ms (0.2%)

bsearch27.0ms (0.3%)

bsearch2.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

derivations288.0ms (3.3%)

preprocess87.0ms (1%)

end0.0ms (0%)

Profiling