Metrics for Henrywood and Agarwal, Equation (12)

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze428.0ms (2.1%)

Memory

0.4MiB live, 577.2MiB allocated

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.8%	0.2%	0%	0%	0%	0
0%	0%	99.8%	0.2%	0%	0%	0%	1
0%	0%	99.8%	0.2%	0%	0%	0%	2
0%	0%	99.8%	0.2%	0%	0%	0%	3
12.5%	12.5%	87.3%	0.2%	0%	0%	0%	4
12.5%	12.5%	87.3%	0.2%	0%	0%	0%	5
12.5%	12.5%	87.3%	0.2%	0%	0%	0%	6
15.4%	12.5%	68.6%	0.2%	0%	18.7%	0%	7
16.7%	12.5%	62.3%	0.2%	0%	24.9%	0%	8
20%	14%	56.1%	0.2%	0%	29.6%	0%	9
20%	14%	56.1%	0.2%	0%	29.6%	0%	10
20%	14%	56.1%	0.2%	0%	29.6%	0%	11
22.9%	14.8%	49.9%	0.2%	0%	35.1%	0%	12

Compiler

Compiled 37 to 24 computations (35.1% saved)

sample7.1s (34.7%)

Memory

3.1MiB live, 7 166.2MiB allocated

Samples

3.2s	12 858×	0	invalid
1.8s	8 256×	0	valid

Precisions

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

ival-div: 1.6s (42.3% of total)

ival-mult: 1.0s (26.8% of total)

ival-pow: 753.0ms (19.6% of total)

ival-pow2: 261.0ms (6.8% of total)

ival-sub: 124.0ms (3.2% of total)

exact: 22.0ms (0.6% of total)

ival-true: 20.0ms (0.5% of total)

ival-assert: 10.0ms (0.3% of total)

Bogosity

explain650.0ms (3.2%)

Memory

9.0MiB live, 530.3MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
62	-	3	(2.454469842324079e-188 3.109417844687004e+128 1.0931832511019107e+94 3.4692306608360786e+236 1.2762630530741369e+47)	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
54	-	3	(-1.7432889926109205e-74 -8.064708342297538e-56 -1.1875253054460087e+237 -0.013311394975489908 -4.467647804593793e+298)	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
34	-	2	(-4.048825014166225e-264 -4.5425031509464883e-296 -2.205530097572625e+20 2.0449024139754582e-268 1.7833490663137058e+80)	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`
26	-	2	(3.371223776284776e-266 4.0420080756426865e-91 2.304155512040148e+188 -6.297454186054512e+234 3.2960637912202365e-283)	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
22	-	3	(-4.175184052817585e-298 -5.68347071654976e-114 -4.105941059019707e-272 -1.807742955515895e-17 -4.7939288888745944e-303)	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`
0	-	0	-	`D`
0	-	0	-	`(*.f64 #s(literal 2 binary64) d)`
0	-	0	-	`(/.f64 h l)`
0	-	0	-	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`
0	-	0	-	`d`
0	-	0	-	`#s(literal 1 binary64)`
0	-	0	-	`(/.f64 d l)`
0	-	0	-	`(*.f64 M D)`
0	-	0	-	`(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))`
0	-	0	-	`(/.f64 d h)`
0	-	0	-	`(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))`
0	-	0	-	`#s(literal 2 binary64)`
0	-	0	-	`l`
0	-	0	-	`(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))`
0	-	0	-	`M`
0	-	0	-	`h`
0	-	0	-	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	36	0
↳	`(/.f64 d h)`	underflow	36
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	32	0
↳	`(/.f64 d l)`	underflow	32
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	23	0
↳	`(/.f64 d h)`	overflow	23
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	19	0
↳	`(/.f64 d l)`	overflow	19
`*.f64`	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	*no**	12	0
`*.f64`	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`	*uo**	11	0
↳	`(/.f64 d h)`	underflow	36
↳	`(/.f64 d l)`	underflow	32
↳	`(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))`	underflow	21
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	82
↳	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))`	overflow	82
↳	`(/.f64 h l)`	overflow	30
↳	`(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))`	overflow	80
↳	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	overflow	80
↳	`(*.f64 M D)`	overflow	28
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	44
`*.f64`	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`	*no**	10	0
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	o/n	9	0
↳	`(*.f64 M D)`	overflow	28
`*.f64`	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`	*nu**	3	0
`*.f64`	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	*uo**	2	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	underflow	73
↳	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))`	underflow	73
↳	`(*.f64 M D)`	underflow	36
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	underflow	40
↳	`(/.f64 h l)`	overflow	30
`*.f64`	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	*ou**	2	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	82
↳	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))`	overflow	82
↳	`(*.f64 M D)`	overflow	28
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	44
↳	`(/.f64 h l)`	underflow	29
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	u/n	2	0
↳	`(*.f64 M D)`	underflow	36

Confusion

	Predicted +	Predicted -
+	82	6
-	32	136

Precision

0.7192982456140351

Recall

0.9318181818181818

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	82	0	6
-	32	0	136

Precision?

0.7192982456140351

Recall?

0.9318181818181818

Freqs

test

number	freq
0	142
1	77
2	27
3	10

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

278.0ms

512×

valid

Compiler

Compiled 347 to 70 computations (79.8% saved)

Precisions

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

ival-pow: 97.0ms (48.9% of total)

ival-pow2: 54.0ms (27.2% of total)

ival-div: 27.0ms (13.6% of total)

ival-mult: 17.0ms (8.6% of total)

ival-sub: 3.0ms (1.5% of total)

ival-true: 1.0ms (0.5% of total)

exact: 1.0ms (0.5% of total)

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

preprocess318.0ms (1.6%)

Memory

-3.3MiB live, 158.2MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	168	564
1	558	553
2	1960	548
3	4611	548
0	22	29
0	38	27
1	67	27
2	174	27
3	1054	27
4	3441	27
5	6724	27
0	8027	26

Stop Event

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

Calls

Call 1

Inputs

(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))

Outputs

(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))

(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))

Symmetry

(abs D)

(abs M)

(sort M D)

Compiler

Compiled 35 to 22 computations (37.1% saved)

eval0.0ms (0%)

Memory: 0.6MiB live, 0.6MiB allocated
Compiler: Compiled 0 to 5 computations (-∞% saved)

prune1.0ms (0%)

Memory

2.4MiB live, 2.4MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	67.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))

Status

Accuracy

Program

▶

67.1%

(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))

Compiler

Compiled 35 to 22 computations (37.1% saved)

simplify123.0ms (0.6%)

Memory

1.3MiB live, 203.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Score
cost-diff	128	(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))
cost-diff	704	(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff	5824	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff	5824	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	22	132
0	38	126
1	67	126
2	174	126
3	1054	126
4	3441	126
5	6724	126
0	8027	124

Stop Event

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

Calls

Call 1

Inputs
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))
(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))
(*.f64 M D)
M
D
(*.f64 #s(literal 2 binary64) d)
(/.f64 h l)

Outputs
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D) #s(literal 2 binary64)) #s(literal 1 binary64))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
(.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D) #s(literal 2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))
(.f64 (pow.f64 (.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D) #s(literal 2 binary64))
(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))
(*.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D)
(*.f64 M D)
(*.f64 D M)
M
D
(*.f64 #s(literal 2 binary64) d)
(/.f64 h l)

localize116.0ms (0.6%)

Memory

19.6MiB live, 134.8MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	5.849489440097058	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
accuracy	7.8064018925805385	(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy	12.283153310990233	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	14.39975115978337	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

102.0ms

256×

valid

Compiler

Compiled 156 to 24 computations (84.6% saved)

Precisions

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

ival-mult: 44.0ms (62.3% of total)

ival-pow: 10.0ms (14.1% of total)

ival-div: 9.0ms (12.7% of total)

ival-sub: 4.0ms (5.7% of total)

ival-pow2: 3.0ms (4.2% of total)

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

exact: 0.0ms (0% of total)

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

series73.0ms (0.4%)

Memory

-5.5MiB live, 147.5MiB allocated

Counts

6 → 228

Calls

Call 1

Inputs
#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())

Outputs
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
12.0ms	h	@	0	((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))))
6.0ms	l	@	-inf	((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))))
5.0ms	D	@	-inf	((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))))
4.0ms	h	@	-inf	((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))))
4.0ms	d	@	-inf	((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))))

simplify146.0ms (0.7%)

Memory

-10.7MiB live, 229.6MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	147	3819
1	413	3735
2	1498	3698
3	4176	3682
4	7950	3682
0	8172	3598

Stop Event

1×	iter limit
1×	node limit

Counts

228 → 228

Calls

Call 1

Inputs
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))

Outputs
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(fma.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))

rewrite155.0ms (0.8%)

Memory

20.8MiB live, 287.0MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	22	72
0	38	68
1	124	67
2	828	67
0	8730	65

Stop Event

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

Counts

6 → 454

Calls

Call 1

Inputs
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval124.0ms (0.6%)

Memory: -23.6MiB live, 275.3MiB allocated
Compiler: Compiled 26 376 to 1 506 computations (94.3% saved)

prune85.0ms (0.4%)

Memory

9.8MiB live, 169.2MiB allocated

Pruning

36 alts after pruning (36 fresh and 0 done)

	Pruned	Kept	Total
New	648	36	684
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	649	36	685

Accuracy

93.8%

Counts

685 → 36

Alt Table

Click to see full alt table

Status	Accuracy	Program
	48.4%	(fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h) (.f64 (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	48.1%	(fma.f64 (.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	66.8%	(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
	66.5%	(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
▶	41.0%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	36.8%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (sqrt.f64 h))
	38.6%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	32.2%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
	57.1%	(/.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))))
	57.1%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	30.0%	(.f64 (pow.f64 d #s(literal 1/4 binary64)) (.f64 (pow.f64 h #s(literal -1/4 binary64)) (.f64 (.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)))))
	66.5%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
▶	66.5%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	68.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) l) h #s(literal 1 binary64)))
	66.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (.f64 (.f64 (/.f64 D d) #s(literal 1/2 binary64)) (.f64 M (/.f64 h l))) #s(literal 1 binary64)))
	64.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) #s(literal 1/4 binary64)) d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) d)))
	68.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) h) #s(literal 1/2 binary64)) l)))
	60.9%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 D M)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 d d)) (.f64 D M)))))
▶	69.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
▶	61.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))))))
	24.9%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))))
	39.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	67.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	39.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	67.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	36.7%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	36.8%	(.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (pow.f64 h #s(literal -1/2 binary64)))
	38.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	13.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l)))
	17.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d))
	23.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h))
	4.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
	16.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
	16.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
▶	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	27.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))

Compiler

Compiled 2 130 to 1 628 computations (23.6% saved)

simplify128.0ms (0.6%)

Memory

-8.8MiB live, 194.2MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	320	(.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))))
cost-diff	704	(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff	5824	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff	5824	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff	0	(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
cost-diff	0	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
cost-diff	0	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d)))
cost-diff	0	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
cost-diff	0	(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
cost-diff	0	(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
cost-diff	0	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
cost-diff	0	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
cost-diff	0	(*.f64 l h)
cost-diff	0	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
cost-diff	0	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
cost-diff	0	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
cost-diff	704	(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff	5824	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff	5824	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff	6848	(/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	78	656
0	130	654
1	255	636
2	720	610
3	4293	610
4	7088	610
0	8040	609

Stop Event

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

Calls

Call 1

Inputs
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))
(.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))
(/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)
(.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
D
M
(/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64)))
(*.f64 D #s(literal 1/2 binary64))
(/.f64 M d)
(pow.f64 h #s(literal -1 binary64))
#s(literal -1 binary64)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
#s(literal 1 binary64)
(*.f64 l h)
l
h
d
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(/.f64 #s(literal 2 binary64) M)
#s(literal 2 binary64)
M
(/.f64 d D)
d
D
#s(literal -2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(/.f64 #s(literal 2 binary64) M)
#s(literal 2 binary64)
M
(/.f64 d D)
d
D
#s(literal -2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))))))
(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))))
(.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(.f64 (/.f64 D d) (.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(/.f64 D d)
D
(.f64 (.f64 M M) #s(literal 1/4 binary64))
(*.f64 M M)
M
#s(literal 1/4 binary64)
(.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))
(*.f64 (/.f64 h l) #s(literal 1/2 binary64))
(/.f64 h l)
#s(literal 1/2 binary64)

Outputs
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(.f64 (neg.f64 (fma.f64 (.f64 (/.f64 D d) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (/.f64 D d) M) M))) (/.f64 h l) #s(literal -1 binary64))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))))
(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))
(neg.f64 (fma.f64 (.f64 (/.f64 D d) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (/.f64 D d) M) M))) (/.f64 h l) #s(literal -1 binary64)))
(.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))
(.f64 (.f64 (/.f64 D d) (.f64 #s(literal 1/8 binary64) (.f64 (*.f64 (/.f64 D d) M) M))) (/.f64 h l))
(/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)
(/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l)
(.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(*.f64 D (/.f64 #s(literal 1/2 binary64) d))
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
D
M
(/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
(.f64 (.f64 (*.f64 (/.f64 M d) h) #s(literal 1/4 binary64)) D)
(.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(.f64 (.f64 (/.f64 M d) #s(literal 1/4 binary64)) D)
(.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/4 binary64) D)
(*.f64 D #s(literal 1/2 binary64))
(/.f64 M d)
(pow.f64 h #s(literal -1 binary64))
#s(literal -1 binary64)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal -1 binary64)) l)) d))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(*.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal -1 binary64)) l)) d)
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal -1 binary64)) l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/.f64 (pow.f64 h #s(literal -1 binary64)) l)
#s(literal 1 binary64)
(*.f64 l h)
l
h
d
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal 1 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
(fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(*.f64 (/.f64 h l) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))
(pow.f64 (*.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(*.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64))
(/.f64 #s(literal 2 binary64) M)
#s(literal 2 binary64)
M
(/.f64 d D)
d
D
#s(literal -2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal 1 binary64)))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d)))
(.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d l))) (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal 1 binary64)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal 1 binary64)))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
(fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(*.f64 (/.f64 h l) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))
(pow.f64 (*.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(*.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64))
(/.f64 #s(literal 2 binary64) M)
#s(literal 2 binary64)
M
(/.f64 d D)
d
D
#s(literal -2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))))))
(.f64 (neg.f64 (fma.f64 (.f64 (/.f64 D d) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (/.f64 D d) M) M))) (/.f64 h l) #s(literal -1 binary64))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))))
(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))))
(neg.f64 (fma.f64 (.f64 (/.f64 D d) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (/.f64 D d) M) M))) (/.f64 h l) #s(literal -1 binary64)))
(.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(.f64 (.f64 (/.f64 D d) (.f64 #s(literal 1/8 binary64) (.f64 (*.f64 (/.f64 D d) M) M))) (/.f64 h l))
(.f64 (/.f64 D d) (.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 D d)) M) M)
(/.f64 D d)
D
(.f64 (.f64 M M) #s(literal 1/4 binary64))
(.f64 #s(literal 1/4 binary64) (.f64 M M))
(*.f64 M M)
M
#s(literal 1/4 binary64)
(.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))
(.f64 (/.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) d) D)
(*.f64 (/.f64 h l) #s(literal 1/2 binary64))
(/.f64 h l)
#s(literal 1/2 binary64)

localize209.0ms (1%)

Memory

10.3MiB live, 447.8MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	4.7880509945786525	(.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))
accuracy	5.307015531352693	(.f64 (/.f64 D d) (.f64 (*.f64 M M) #s(literal 1/4 binary64)))
accuracy	5.666880486983616	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	6.445457472475282	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	1.7228095126346146	(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
accuracy	2.175653445410645	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
accuracy	2.4265265968549308	(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
accuracy	5.666880486983616	(sqrt.f64 (/.f64 d l))
accuracy	1.7228095126346146	(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
accuracy	2.4265265968549308	(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
accuracy	5.666880486983616	(sqrt.f64 (/.f64 d l))
accuracy	6.445457472475282	(sqrt.f64 (/.f64 d h))
accuracy	0.1328125	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
accuracy	0.1647352150857086	(/.f64 #s(literal 1 binary64) (*.f64 l h))
accuracy	9.805160025287973	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
accuracy	30.828986296461064	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
accuracy	3.0692682990322795	(.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
accuracy	3.3152816915288508	(/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
accuracy	5.666880486983616	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	6.445457472475282	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

80.0ms	131×	0	valid
70.0ms	125×	0	invalid

Compiler

Compiled 690 to 73 computations (89.4% saved)

Precisions

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

ival-mult: 41.0ms (38.7% of total)

ival-div: 24.0ms (22.7% of total)

ival-pow: 19.0ms (17.9% of total)

ival-sqrt: 8.0ms (7.6% of total)

ival-neg: 5.0ms (4.7% of total)

ival-sub: 4.0ms (3.8% of total)

ival-pow2: 3.0ms (2.8% of total)

ival-add: 1.0ms (0.9% of total)

exact: 1.0ms (0.9% of total)

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

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

series175.0ms (0.9%)

Memory

11.3MiB live, 325.3MiB allocated

Counts

23 → 912

Calls

Call 1

Inputs
#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())
#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())
#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())
#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())

Outputs
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 h) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 h) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 h) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 h) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf h) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf h) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf h) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf h) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf h) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf h) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf h) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf h) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 l) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 l) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 l) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 l) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf l) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf l) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf l) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf l) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf l) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf l) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf l) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf l) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 D) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 D) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 D) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 D) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 d) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 d) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 d) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor 0 d) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) (patch (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D h) (* d l))) (taylor -inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) (patch (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
23.0ms	d	@	-inf	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (* -1/2 (/ h l)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (* (* (/ D d) (* (* M M) 1/4)) (* (/ D d) (* (/ h l) 1/2))) (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 (* l h)) (sqrt (/ d h)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (* (/ D d) (* (* M M) 1/4)) (* (/ D d) (* (/ h l) 1/2)))
14.0ms	h	@	-inf	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (* -1/2 (/ h l)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (* (* (/ D d) (* (* M M) 1/4)) (* (/ D d) (* (/ h l) 1/2))) (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 (* l h)) (sqrt (/ d h)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (* (/ D d) (* (* M M) 1/4)) (* (/ D d) (* (/ h l) 1/2)))
13.0ms	d	@	0	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (* -1/2 (/ h l)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (* (* (/ D d) (* (* M M) 1/4)) (* (/ D d) (* (/ h l) 1/2))) (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 (* l h)) (sqrt (/ d h)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (* (/ D d) (* (* M M) 1/4)) (* (/ D d) (* (/ h l) 1/2)))
11.0ms	h	@	0	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (* -1/2 (/ h l)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (* (* (/ D d) (* (* M M) 1/4)) (* (/ D d) (* (/ h l) 1/2))) (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 (* l h)) (sqrt (/ d h)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (* (/ D d) (* (* M M) 1/4)) (* (/ D d) (* (/ h l) 1/2)))
10.0ms	D	@	0	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (* -1/2 (/ h l)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (* (* (/ D d) (* (* M M) 1/4)) (* (/ D d) (* (/ h l) 1/2))) (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 (* l h)) (sqrt (/ d h)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (* (/ D d) (* (* M M) 1/4)) (* (/ D d) (* (/ h l) 1/2)))

simplify187.0ms (0.9%)

Memory

-13.7MiB live, 294.6MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	379	14661
1	1112	14207
2	4003	14120
0	8113	13820

Stop Event

1×	iter limit
1×	node limit

Counts

912 → 912

Calls

Call 1

Inputs
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* h l)
(* h l)
(* h l)
(* h l)
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(sqrt (/ d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* h l)
(* h l)
(* h l)
(* h l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* h l)
(* h l)
(* h l)
(* h l)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* h l)
(* h l)
(* h l)
(* h l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* h l)
(* h l)
(* h l)
(* h l)
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* h l)
(* h l)
(* h l)
(* h l)
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(sqrt (/ d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(sqrt (/ d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/4 (/ (* D (pow M 2)) d))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))
(* 1/2 (/ (* D h) (* d l)))

Outputs
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (*.f64 d h))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (*.f64 d h))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (*.f64 d h))) h)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) l)) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) l)) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) l)) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 M M))) (*.f64 M M))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 h D) D) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 h D) D) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 h D) D) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 M M))) (*.f64 M M))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 h D) D) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 h D) D) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 h D) D) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (*.f64 l (sqrt.f64 (/.f64 d h)))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (*.f64 l (sqrt.f64 (/.f64 d h)))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (*.f64 l (sqrt.f64 (/.f64 d h)))) l)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (pow.f64 l #s(literal 3 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (pow.f64 l #s(literal 3 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (pow.f64 l #s(literal 3 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))) (*.f64 l l))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))
(.f64 (neg.f64 d) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (.f64 (neg.f64 h) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (.f64 (neg.f64 h) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (.f64 (neg.f64 h) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(-.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(-.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(-.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 D D))) (*.f64 D D))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 D D))) (*.f64 D D))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 d d)) (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 d d)) (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 d d)) (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (.f64 d d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d))) d)
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d))) d)
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (.f64 M M))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (.f64 M M))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (.f64 M M))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) d)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(.f64 (neg.f64 d) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(.f64 (neg.f64 d) (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (.f64 M M))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(.f64 (neg.f64 d) (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (.f64 M M))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(.f64 (neg.f64 d) (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (.f64 M M))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/4 binary64))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (pow M 2)) d))
(.f64 (/.f64 (.f64 (*.f64 M D) M) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))
(* 1/2 (/ (* D h) (* d l)))
(.f64 (/.f64 (.f64 #s(literal 1/2 binary64) h) l) (/.f64 D d))

rewrite199.0ms (1%)

Memory

4.6MiB live, 239.5MiB allocated

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	68	288
0	108	281
1	327	263
2	2141	255
0	8265	255

Stop Event

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

Counts

23 → 1 126

Calls

Call 1

Inputs
(/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(*.f64 l h)
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(sqrt.f64 (/.f64 d h))
(sqrt.f64 (/.f64 d l))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(.f64 (/.f64 D d) (.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64)))

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval427.0ms (2.1%)

Memory: 39.4MiB live, 826.4MiB allocated
Compiler: Compiled 86 866 to 5 564 computations (93.6% saved)

prune175.0ms (0.9%)

Memory

2.4MiB live, 462.9MiB allocated

Pruning

59 alts after pruning (58 fresh and 1 done)

	Pruned	Kept	Total
New	2 537	44	2 581
Fresh	17	14	31
Picked	4	1	5
Done	0	0	0
Total	2 558	59	2 617

Accuracy

95.8%

Counts

2 617 → 59

Alt Table

Click to see full alt table

Status	Accuracy	Program
	31.3%	(fma.f64 (/.f64 d (sqrt.f64 (.f64 l h))) #s(literal 1 binary64) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)))))
	48.4%	(fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h) (.f64 (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	66.8%	(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
	42.3%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	41.2%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) d) (*.f64 M D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	36.8%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (sqrt.f64 h))
	38.6%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	32.2%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
	14.7%	(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	26.5%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	4.5%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	34.3%	(.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
▶	57.1%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
▶	68.6%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	68.4%	(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) h)) (pow.f64 l #s(literal -1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	67.0%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) d) (*.f64 M D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	36.8%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 h #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 d l)))
	66.5%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	64.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) #s(literal 1/4 binary64)) d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) d)))
	52.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) D)) (*.f64 d d))))
	68.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 M (.f64 #s(literal 1/4 binary64) D)) h) d))))
	52.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) D)) (/.f64 #s(literal 1 binary64) (.f64 d d)))))
	39.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	34.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	34.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (pow.f64 l #s(literal -1/2 binary64)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	39.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	42.6%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	38.3%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	42.6%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	49.6%	(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	24.9%	(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	17.9%	(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 d l)))
	21.4%	(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)) (sqrt.f64 (/.f64 d l)))
	42.2%	(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	17.3%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
	27.3%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	38.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	42.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
	18.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
	19.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
	14.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
	20.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
	22.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
▶	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
▶	18.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
	36.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
	23.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h))
▶	4.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
	25.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1/4 binary64)) #s(literal 2 binary64)) d))
	22.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (pow.f64 h #s(literal -1/2 binary64)) (sqrt.f64 l)) d))
	3.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (pow.f64 l #s(literal -1 binary64)))) (sqrt.f64 (neg.f64 h))) d))
	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	16.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
✓	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	18.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (.f64 (/.f64 d l) d)) (pow.f64 h #s(literal -1/2 binary64))))
	20.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (pow.f64 (neg.f64 h) #s(literal -1/2 binary64))))
	32.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
	36.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))

Compiler

Compiled 2 753 to 2 277 computations (17.3% saved)

simplify137.0ms (0.7%)

Memory

0.9MiB live, 194.2MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (*.f64 D D))
cost-diff	0	(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
cost-diff	0	(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)
cost-diff	0	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
cost-diff	0	(/.f64 h l)
cost-diff	0	(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
cost-diff	0	(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
cost-diff	0	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
cost-diff	0	(sqrt.f64 h)
cost-diff	0	(/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))
cost-diff	0	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
cost-diff	704	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))
cost-diff	0	(*.f64 l h)
cost-diff	0	(sqrt.f64 (*.f64 l h))
cost-diff	0	(/.f64 d (sqrt.f64 (*.f64 l h)))
cost-diff	0	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
cost-diff	0	(.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D))
cost-diff	0	(.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
cost-diff	0	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
cost-diff	320	(fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	78	606
0	129	600
1	238	600
2	607	596
3	2808	593
4	5303	593
0	8051	587

Stop Event

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

Calls

Call 1

Inputs
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))
(.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D))
(*.f64 (/.f64 h l) #s(literal -1/2 binary64))
(/.f64 h l)
h
l
#s(literal -1/2 binary64)
(.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)
(*.f64 M (/.f64 #s(literal 1/2 binary64) d))
M
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
d
D
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
d
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
l
h
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))
#s(literal 1 binary64)
(/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))
(sqrt.f64 h)
h
(sqrt.f64 (*.f64 (/.f64 d l) d))
(*.f64 (/.f64 d l) d)
(/.f64 d l)
d
l
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(/.f64 #s(literal 2 binary64) M)
#s(literal 2 binary64)
M
(/.f64 d D)
d
D
#s(literal -2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
(*.f64 (/.f64 (/.f64 d l) h) d)
(/.f64 (/.f64 d l) h)
(/.f64 d l)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (*.f64 D D))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 M M))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))
#s(literal 1 binary64)
(*.f64 (pow.f64 l #s(literal 3 binary64)) h)
(pow.f64 l #s(literal 3 binary64))
l
#s(literal 3 binary64)
h
(*.f64 M M)
M
(*.f64 D D)
D
(/.f64 #s(literal 1/8 binary64) d)
#s(literal 1/8 binary64)
d
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))
(neg.f64 d)
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))
(*.f64 (pow.f64 h #s(literal 3 binary64)) l)
(pow.f64 h #s(literal 3 binary64))

Outputs
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (.f64 M M)) (.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 D d) (/.f64 D d))) #s(literal 1 binary64)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (.f64 M M)) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 D d) (/.f64 D d))) #s(literal 1 binary64)))
(fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))
(fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (.f64 M M)) (.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 D d) (/.f64 D d))) #s(literal 1 binary64))
(.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D))
(.f64 (.f64 (.f64 D (.f64 #s(literal -1/2 binary64) (/.f64 h l))) M) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (/.f64 h l) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(/.f64 h l)
h
l
#s(literal -1/2 binary64)
(.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)
(.f64 D (.f64 (/.f64 #s(literal 1/2 binary64) d) M))
(*.f64 M (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) M)
M
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
d
D
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
d
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
l
h
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h))
#s(literal 1 binary64)
(/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))
(sqrt.f64 h)
h
(sqrt.f64 (*.f64 (/.f64 d l) d))
(*.f64 (/.f64 d l) d)
(/.f64 d l)
d
l
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (fma.f64 (pow.f64 (.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D)) #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
(fma.f64 (pow.f64 (.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D)) #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))
(pow.f64 (*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D)) #s(literal -2 binary64))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D))
(/.f64 #s(literal 2 binary64) M)
#s(literal 2 binary64)
M
(/.f64 d D)
d
D
#s(literal -2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
(*.f64 (/.f64 (/.f64 d l) h) d)
(/.f64 (/.f64 d l) h)
(/.f64 d l)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (/.f64 #s(literal 1/8 binary64) d) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (neg.f64 d))) h))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)
(.f64 (fma.f64 (/.f64 #s(literal 1/8 binary64) d) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (neg.f64 d))) h)
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(fma.f64 (/.f64 #s(literal 1/8 binary64) d) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) (neg.f64 d)))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (*.f64 D D))
(.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 M M))
(.f64 (.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))
#s(literal 1 binary64)
(*.f64 (pow.f64 l #s(literal 3 binary64)) h)
(pow.f64 l #s(literal 3 binary64))
l
#s(literal 3 binary64)
h
(*.f64 M M)
M
(*.f64 D D)
D
(/.f64 #s(literal 1/8 binary64) d)
#s(literal 1/8 binary64)
d
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (neg.f64 d))
(neg.f64 d)
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))
(*.f64 (pow.f64 h #s(literal 3 binary64)) l)
(pow.f64 h #s(literal 3 binary64))

localize248.0ms (1.2%)

Memory

18.3MiB live, 590.9MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	7.5622005139572375	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (*.f64 D D))
accuracy	8.765039379932947	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
accuracy	9.096991380867454	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
accuracy	29.195604318440044	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
accuracy	2.421119122479458	(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
accuracy	3.2431205814140376	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
accuracy	3.8916543271758925	(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
accuracy	11.33840612140201	(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
accuracy	0.4275160053972641	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))
accuracy	1.0466483592978872	(/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))
accuracy	9.689353995805618	(sqrt.f64 (*.f64 (/.f64 d l) d))
accuracy	16.52497662055043	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
accuracy	0	(*.f64 l h)
accuracy	0.08984375	(/.f64 d (sqrt.f64 (*.f64 l h)))
accuracy	7.399811491016588	(sqrt.f64 (*.f64 l h))
accuracy	16.52497662055043	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
accuracy	2.4429101026589177	(.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)
accuracy	4.642926738756675	(.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D))
accuracy	6.616272824006618	(sqrt.f64 (/.f64 d l))
accuracy	7.954293687308089	(sqrt.f64 (/.f64 d h))

Samples

106.0ms	131×	0	invalid
77.0ms	125×	0	valid

Compiler

Compiled 580 to 77 computations (86.7% saved)

Precisions

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

ival-mult: 50.0ms (34.6% of total)

ival-div: 38.0ms (26.3% of total)

ival-pow: 24.0ms (16.6% of total)

ival-sqrt: 13.0ms (9% of total)

ival-pow2: 13.0ms (9% of total)

ival-add: 4.0ms (2.8% of total)

ival-sub: 1.0ms (0.7% of total)

exact: 1.0ms (0.7% of total)

ival-neg: 1.0ms (0.7% of total)

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

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

series216.0ms (1.1%)

Memory

8.3MiB live, 396.7MiB allocated

Counts

28 → 1 152

Calls

Call 1

Inputs
#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())
#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())
#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())
#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())
#s(alt (sqrt.f64 h) (patch (sqrt.f64 h) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())
#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())
#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())
#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())

Outputs
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt h) (taylor 0 h) (#s(alt (sqrt.f64 h) (patch (sqrt.f64 h) #<representation binary64>) () ())) ())
#s(alt (sqrt h) (taylor 0 h) (#s(alt (sqrt.f64 h) (patch (sqrt.f64 h) #<representation binary64>) () ())) ())
#s(alt (sqrt h) (taylor 0 h) (#s(alt (sqrt.f64 h) (patch (sqrt.f64 h) #<representation binary64>) () ())) ())
#s(alt (sqrt h) (taylor 0 h) (#s(alt (sqrt.f64 h) (patch (sqrt.f64 h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) (pow h 2)) (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) (pow h 2)) (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) (pow h 2)) (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt h) (taylor inf h) (#s(alt (sqrt.f64 h) (patch (sqrt.f64 h) #<representation binary64>) () ())) ())
#s(alt (sqrt h) (taylor inf h) (#s(alt (sqrt.f64 h) (patch (sqrt.f64 h) #<representation binary64>) () ())) ())
#s(alt (sqrt h) (taylor inf h) (#s(alt (sqrt.f64 h) (patch (sqrt.f64 h) #<representation binary64>) () ())) ())
#s(alt (sqrt h) (taylor inf h) (#s(alt (sqrt.f64 h) (patch (sqrt.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt h) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 h) (patch (sqrt.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt h) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 h) (patch (sqrt.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt h) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 h) (patch (sqrt.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt h) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 h) (patch (sqrt.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor -inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor -inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor -inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor -inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf M) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ (pow l 3) (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h))))) (pow l 2)) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ (pow l 3) (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h))))) (pow l 2)) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ (pow l 3) (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h))))) (pow l 2)) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor inf l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor inf l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor inf l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor inf l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h (pow l 3)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow h 3) l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor -inf l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor -inf l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor -inf l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor -inf l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3)))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3)))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3)))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3)))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf D) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))))) d) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))))) d) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))))) d) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1 (sqrt (/ 1 (* (pow h 3) l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1 (sqrt (/ 1 (* (pow h 3) l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1 (sqrt (/ 1 (* (pow h 3) l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) (patch (/.f64 (sqrt.f64 h) (sqrt.f64 (.f64 (/.f64 d l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) (patch (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* (pow h 3) l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* (pow h 3) l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* (pow h 3) l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) (patch (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (patch (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) d)) (patch (sqrt.f64 (.f64 (/.f64 d l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
27.0ms	D	@	-inf	((+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (* (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (/ 1 (/ (sqrt h) (sqrt (* (/ d l) d)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt h) (sqrt (* (/ d l) d))) (sqrt h) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (* (/ (/ d l) h) d))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (* -1/2 (/ h l)) (/ h l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (+ (* (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) h) (+ (* (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (sqrt (/ d h)) (sqrt (/ d l)) (* (* M (/ 1/2 d)) D) (sqrt (* (/ d l) d)) (sqrt (* (/ (/ d l) h) d)) (* (/ 2 M) (/ d D)) (sqrt (/ 1 (* (pow l 3) h))) (sqrt (/ 1 (* (pow h 3) l))))
19.0ms	d	@	-inf	((+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (* (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (/ 1 (/ (sqrt h) (sqrt (* (/ d l) d)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt h) (sqrt (* (/ d l) d))) (sqrt h) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (* (/ (/ d l) h) d))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (* -1/2 (/ h l)) (/ h l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (+ (* (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) h) (+ (* (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (sqrt (/ d h)) (sqrt (/ d l)) (* (* M (/ 1/2 d)) D) (sqrt (* (/ d l) d)) (sqrt (* (/ (/ d l) h) d)) (* (/ 2 M) (/ d D)) (sqrt (/ 1 (* (pow l 3) h))) (sqrt (/ 1 (* (pow h 3) l))))
11.0ms	h	@	-inf	((+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (* (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (/ 1 (/ (sqrt h) (sqrt (* (/ d l) d)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt h) (sqrt (* (/ d l) d))) (sqrt h) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (* (/ (/ d l) h) d))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (* -1/2 (/ h l)) (/ h l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (+ (* (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) h) (+ (* (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (sqrt (/ d h)) (sqrt (/ d l)) (* (* M (/ 1/2 d)) D) (sqrt (* (/ d l) d)) (sqrt (* (/ (/ d l) h) d)) (* (/ 2 M) (/ d D)) (sqrt (/ 1 (* (pow l 3) h))) (sqrt (/ 1 (* (pow h 3) l))))
11.0ms	l	@	-inf	((+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (* (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (/ 1 (/ (sqrt h) (sqrt (* (/ d l) d)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt h) (sqrt (* (/ d l) d))) (sqrt h) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (* (/ (/ d l) h) d))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (* -1/2 (/ h l)) (/ h l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (+ (* (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) h) (+ (* (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (sqrt (/ d h)) (sqrt (/ d l)) (* (* M (/ 1/2 d)) D) (sqrt (* (/ d l) d)) (sqrt (* (/ (/ d l) h) d)) (* (/ 2 M) (/ d D)) (sqrt (/ 1 (* (pow l 3) h))) (sqrt (/ 1 (* (pow h 3) l))))
10.0ms	l	@	0	((+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (* (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (/ 1 (/ (sqrt h) (sqrt (* (/ d l) d)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt h) (sqrt (* (/ d l) d))) (sqrt h) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (* (/ (/ d l) h) d))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (* -1/2 (/ h l)) (/ h l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (+ (* (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) h) (+ (* (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (sqrt (/ d h)) (sqrt (/ d l)) (* (* M (/ 1/2 d)) D) (sqrt (* (/ d l) d)) (sqrt (* (/ (/ d l) h) d)) (* (/ 2 M) (/ d D)) (sqrt (/ 1 (* (pow l 3) h))) (sqrt (/ 1 (* (pow h 3) l))))

simplify227.0ms (1.1%)

Memory

-21.5MiB live, 334.3MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	334	19064
1	985	18302
2	3369	18185
3	7516	18110
0	8013	17780

Stop Event

1×	iter limit
1×	node limit

Counts

1 152 → 1 152

Calls

Call 1

Inputs
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(sqrt (/ d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* h l)
(* h l)
(* h l)
(* h l)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(sqrt h)
(sqrt h)
(sqrt h)
(sqrt h)
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(/ h l)
(/ h l)
(/ h l)
(/ h l)
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1 (* d (sqrt (/ 1 (* h l)))))
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(* -1 (* d (sqrt (/ 1 (* (pow h 3) l)))))
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) (pow h 2))
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) (pow h 2))
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) (pow h 2))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* h l)
(* h l)
(* h l)
(* h l)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(sqrt h)
(sqrt h)
(sqrt h)
(sqrt h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(/ h l)
(/ h l)
(/ h l)
(/ h l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* h l)
(* h l)
(* h l)
(* h l)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(* -1 (* (sqrt h) (pow (sqrt -1) 2)))
(* -1 (* (sqrt h) (pow (sqrt -1) 2)))
(* -1 (* (sqrt h) (pow (sqrt -1) 2)))
(* -1 (* (sqrt h) (pow (sqrt -1) 2)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(/ h l)
(/ h l)
(/ h l)
(/ h l)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l)))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l)))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l)))))
(* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3)))))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2))
(* -1 (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2)))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(* -1 (* d (sqrt (/ 1 (* (pow h 3) l)))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* h l)
(* h l)
(* h l)
(* h l)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(/ h l)
(/ h l)
(/ h l)
(/ h l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h))))) (pow l 2))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h))))) (pow l 2))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h))))) (pow l 2))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt (/ 1 (* (pow h 3) l)))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* h l)
(* h l)
(* h l)
(* h l)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(/ h l)
(/ h l)
(/ h l)
(/ h l)
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(* -1 (* d (sqrt (/ 1 (* (pow h 3) l)))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt (/ 1 (* (pow h 3) l)))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* h l)
(* h l)
(* h l)
(* h l)
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(/ h l)
(/ h l)
(/ h l)
(/ h l)
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l)))))
(+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))
(+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))
(+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))
(* -1 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3))))))
(* -1 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3))))))
(* -1 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3))))))
(* -1 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3))))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* -1 (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2)))
(* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(* -1 (* d (sqrt (/ 1 (* (pow h 3) l)))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))))) d)
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(sqrt (/ d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* (/ 1 d) (sqrt (* h l)))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* d (sqrt (/ 1 (* (pow h 3) l)))))
(* d (+ (* -1 (sqrt (/ 1 (* (pow h 3) l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3))))))))
(* d (+ (* -1 (sqrt (/ 1 (* (pow h 3) l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3))))))))
(* d (+ (* -1 (sqrt (/ 1 (* (pow h 3) l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3))))))))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (sqrt (/ 1 (* (pow h 3) l)))))
(* -1 (* d (+ (sqrt (/ 1 (* (pow h 3) l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* d (+ (sqrt (/ 1 (* (pow h 3) l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* d (+ (sqrt (/ 1 (* (pow h 3) l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1 (* d (sqrt (/ 1 l))))
(* -1 (* d (sqrt (/ 1 l))))
(* -1 (* d (sqrt (/ 1 l))))
(* -1 (* d (sqrt (/ 1 l))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))

Outputs
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (pow.f64 (/.f64 h d) #s(literal 3 binary64))) (sqrt.f64 (*.f64 d h))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (pow.f64 (/.f64 h d) #s(literal 3 binary64))) (sqrt.f64 (*.f64 d h))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (pow.f64 (/.f64 h d) #s(literal 3 binary64))) (sqrt.f64 (*.f64 d h))) h)
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(sqrt h)
(sqrt.f64 h)
(sqrt h)
(sqrt.f64 h)
(sqrt h)
(sqrt.f64 h)
(sqrt h)
(sqrt.f64 h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h)
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h)
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h)
(* -1 (* d (sqrt (/ 1 (* (pow h 3) l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) (pow h 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) (.f64 h h))
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) (pow h 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) (.f64 h h))
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) (pow h 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) (.f64 h h))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(sqrt h)
(sqrt.f64 h)
(sqrt h)
(sqrt.f64 h)
(sqrt h)
(sqrt.f64 h)
(sqrt h)
(sqrt.f64 h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 (neg.f64 M) M) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (*.f64 D D))) (/.f64 #s(literal -1/8 binary64) l))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M l))) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M l))) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M l))) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1 (* (sqrt h) (pow (sqrt -1) 2)))
(sqrt.f64 h)
(* -1 (* (sqrt h) (pow (sqrt -1) 2)))
(sqrt.f64 h)
(* -1 (* (sqrt h) (pow (sqrt -1) 2)))
(sqrt.f64 h)
(* -1 (* (sqrt h) (pow (sqrt -1) 2)))
(sqrt.f64 h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))
(.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal 1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal 1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal 1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 (neg.f64 M) M))
(* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 (neg.f64 M) M))
(* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 (neg.f64 M) M))
(* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 (neg.f64 M) M))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))))
(* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))))
(* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))))
(* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))))
(* -1 (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(* -1 (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(* -1 (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(* -1 (* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* d (sqrt (/ 1 (* (pow h 3) l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (/.f64 (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l)))) (.f64 M M))) (.f64 M M))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (/.f64 (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l)))) (.f64 M M))) (.f64 M M))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (/.f64 (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l)))) (.f64 M M))) (.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (/.f64 (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l)))) (.f64 M M))) (.f64 M M))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (/.f64 (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l)))) (.f64 M M))) (.f64 M M))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (/.f64 (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l)))) (.f64 M M))) (.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (*.f64 (sqrt.f64 (/.f64 d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (*.f64 (sqrt.f64 (/.f64 d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (*.f64 (sqrt.f64 (/.f64 d h)) l)) l)
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (*.f64 l l))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (*.f64 l l))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (*.f64 l l))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h))))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 l h))) (.f64 (.f64 (.f64 M M) D) (/.f64 D d)) (.f64 (neg.f64 d) (sqrt.f64 (pow.f64 (/.f64 l h) #s(literal 3 binary64))))) (.f64 l l))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h))))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 l h))) (.f64 (.f64 (.f64 M M) D) (/.f64 D d)) (.f64 (neg.f64 d) (sqrt.f64 (pow.f64 (/.f64 l h) #s(literal 3 binary64))))) (.f64 l l))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h))))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 l h))) (.f64 (.f64 (.f64 M M) D) (/.f64 D d)) (.f64 (neg.f64 d) (sqrt.f64 (pow.f64 (/.f64 l h) #s(literal 3 binary64))))) (.f64 l l))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* d (sqrt (/ 1 (* (pow h 3) l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* h (pow l 3))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
(sqrt (/ 1 (* (pow h 3) l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(/ h l)
(/.f64 h l)
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)
(+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d))
(+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d))
(+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d))
(* -1 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3))))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* -1 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3))))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* -1 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3))))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* -1 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* h (pow l 3))))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1 (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(* -1 (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(* -1 (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(* -1 (* (sqrt (/ 1 (* h (pow l 3)))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))))
(* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))))
(* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))))
(* (sqrt (/ 1 (* (pow h 3) l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* d (sqrt (/ 1 (* (pow h 3) l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (/.f64 (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l)))) (.f64 D D))) (.f64 D D))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (/.f64 (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l)))) (.f64 D D))) (.f64 D D))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (/.f64 (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l)))) (.f64 D D))) (.f64 D D))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d h)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (/.f64 (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l)))) (.f64 D D))) (.f64 D D))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (/.f64 (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l)))) (.f64 D D))) (.f64 D D))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (/.f64 (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l)))) (.f64 D D))) (.f64 D D))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (*.f64 M M))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 (neg.f64 d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 (neg.f64 d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 (neg.f64 d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))))
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))))) d)
(/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 (.f64 (neg.f64 d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))))) d)
(/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 (.f64 (neg.f64 d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* h (pow l 3))))))) d)
(/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 (.f64 (neg.f64 d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) d)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d))) d)
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d))) d)
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (*.f64 D D) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d))) d)
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* (/ 1 d) (sqrt (* h l)))
(/.f64 (sqrt.f64 (*.f64 l h)) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* d (sqrt (/ 1 (* (pow h 3) l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))
(* d (+ (* -1 (sqrt (/ 1 (* (pow h 3) l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(* d (+ (* -1 (sqrt (/ 1 (* (pow h 3) l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(* d (+ (* -1 (sqrt (/ 1 (* (pow h 3) l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(.f64 (neg.f64 d) (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d)))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1 (* (/ 1 d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d))
(* -1 (* (/ 1 d) (sqrt (* h l))))
(/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d) #s(literal 1 binary64))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* d (sqrt (/ 1 (* (pow h 3) l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))
(* -1 (* d (+ (sqrt (/ 1 (* (pow h 3) l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 d) (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(* -1 (* d (+ (sqrt (/ 1 (* (pow h 3) l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 d) (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(* -1 (* d (+ (sqrt (/ 1 (* (pow h 3) l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 d) (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* -1 (* d (sqrt (/ 1 l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))
(* -1 (* d (sqrt (/ 1 l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))
(* -1 (* d (sqrt (/ 1 l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))
(* -1 (* d (sqrt (/ 1 l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(.f64 (/.f64 d (.f64 M D)) #s(literal 2 binary64))

rewrite178.0ms (0.9%)

Memory

35.3MiB live, 310.8MiB allocated

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	78	450
0	129	444
1	429	380
2	2777	366
0	8339	366

Stop Event

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

Counts

28 → 1 221

Calls

Call 1

Inputs
(fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
(/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))
(sqrt.f64 h)
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(/.f64 h l)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (*.f64 D D))
(sqrt.f64 (/.f64 d h))
(sqrt.f64 (/.f64 d l))
(.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)
(sqrt.f64 (*.f64 (/.f64 d l) d))
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l)))

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval337.0ms (1.7%)

Memory: -9.1MiB live, 660.1MiB allocated
Compiler: Compiled 72 496 to 4 624 computations (93.6% saved)

prune269.0ms (1.3%)

Memory

3.2MiB live, 494.7MiB allocated

Pruning

61 alts after pruning (58 fresh and 3 done)

	Pruned	Kept	Total
New	2 493	36	2 529
Fresh	31	22	53
Picked	3	2	5
Done	0	1	1
Total	2 527	61	2 588

Accuracy

97.1%

Counts

2 588 → 61

Alt Table

Click to see full alt table

Status	Accuracy	Program
	48.4%	(fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h) (.f64 (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	41.2%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) d) (*.f64 M D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	32.2%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
	14.7%	(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	26.5%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
▶	4.5%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	55.9%	(.f64 (fma.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	55.5%	(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	58.6%	(.f64 (fma.f64 (.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (/.f64 h l)) (.f64 (.f64 #s(literal -1/2 binary64) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	55.1%	(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	59.0%	(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #s(literal -1/2 binary64)) h) (pow.f64 l #s(literal -1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	55.5%	(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) M) (/.f64 #s(literal 1/2 binary64) d)) (.f64 D (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	36.1%	(.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
	52.7%	(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	42.2%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))) (sqrt.f64 (/.f64 d l)))
	37.9%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))
	41.2%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))
	34.0%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
	33.9%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 l #s(literal -1/4 binary64)) #s(literal 2 binary64))))
✓	68.6%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
▶	64.3%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
▶	31.1%	(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
▶	66.9%	(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	52.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) D)) (/.f64 #s(literal 1 binary64) (.f64 d d)))))
	34.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	34.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (pow.f64 l #s(literal -1/2 binary64)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	42.6%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	38.3%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	42.6%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	49.6%	(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	25.3%	(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	44.3%	(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	44.1%	(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	23.5%	(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	18.0%	(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 d l)))
	21.4%	(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)) (sqrt.f64 (/.f64 d l)))
	42.2%	(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	17.3%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
	27.3%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	38.8%	#s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (* (/ (/ d l) h) d))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	17.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
	42.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
	20.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
	19.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
	20.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (pow.f64 (.f64 (.f64 l h) (*.f64 l h)) #s(literal 1/4 binary64))))
	22.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
	20.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
	4.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
	36.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
	26.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
	25.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1/4 binary64)) #s(literal 2 binary64)) d))
	22.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 h #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 l))))
▶	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	16.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
✓	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	26.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 #s(approx (+ ( (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)))) h))
	15.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 #s(approx (+ ( (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
	35.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	36.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))

Compiler

Compiled 2 860 to 2 299 computations (19.6% saved)

simplify149.0ms (0.7%)

Memory

-21.4MiB live, 134.6MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l))
cost-diff	0	(.f64 (fma.f64 (.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h)))
cost-diff	0	(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
cost-diff	320	(fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64))
cost-diff	0	(fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64))
cost-diff	0	(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
cost-diff	0	(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
cost-diff	320	(.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))
cost-diff	0	(neg.f64 (sqrt.f64 (/.f64 d l)))
cost-diff	0	#s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))
cost-diff	0	(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d)))
cost-diff	0	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
cost-diff	0	(sqrt.f64 (*.f64 l h))
cost-diff	0	(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))
cost-diff	0	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
cost-diff	320	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)
cost-diff	0	#s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d)))
cost-diff	0	(fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))
cost-diff	0	(.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
cost-diff	0	(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	91	697
0	144	695
1	276	688
2	757	668
3	3727	668
4	5605	668
5	7484	668
0	8067	661

Stop Event

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

Calls

Call 1

Inputs
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))
#s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l)
(.f64 #s(literal -1/4 binary64) (.f64 M D))
#s(literal -1/4 binary64)
(*.f64 M D)
M
D
l
(/.f64 h d)
h
d
(.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)
(*.f64 M (/.f64 #s(literal 1/2 binary64) d))
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))
#s(literal 1 binary64)
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
l
h
d
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d)))
#s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
d
l
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
h
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64))
(.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M)
(.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d))
(.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))
(.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D)
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
D
(*.f64 (/.f64 #s(literal 1/2 binary64) d) M)
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
d
M
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (fma.f64 (.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64))
(.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l))
(*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)))
#s(literal 1/4 binary64)
(pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))
(/.f64 (/.f64 d D) M)
(/.f64 d D)
d
D
M
#s(literal -2 binary64)
(/.f64 h l)
h
l
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 (/.f64 d l) h))
(/.f64 (/.f64 d l) h)
(/.f64 d l)
(sqrt.f64 d)

Outputs
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) D) (/.f64 M l))) #s(literal 1 binary64)))
(.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) D) (/.f64 M l))) #s(literal 1 binary64)))
(fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))
(fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) D) (/.f64 M l))) #s(literal 1 binary64))
#s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d)))
#s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) D) (/.f64 M l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))
(.f64 (.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) D) (/.f64 M l))
(/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l)
(/.f64 (.f64 (.f64 D M) #s(literal -1/4 binary64)) l)
(.f64 #s(literal -1/4 binary64) (.f64 M D))
(.f64 (.f64 D M) #s(literal -1/4 binary64))
#s(literal -1/4 binary64)
(*.f64 M D)
(*.f64 D M)
M
D
l
(/.f64 h d)
h
d
(.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)
(.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(*.f64 M (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) M)
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)
(/.f64 d (sqrt.f64 (*.f64 l h)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))
#s(literal 1 binary64)
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
l
h
d
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d)))
(.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
d
l
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
h
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) d) (.f64 (/.f64 h l) #s(literal -1/4 binary64))) (*.f64 D M) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) d) (.f64 (/.f64 h l) #s(literal -1/4 binary64))) (.f64 D M) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64))
(fma.f64 (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) d) (.f64 (/.f64 h l) #s(literal -1/4 binary64))) (*.f64 D M) #s(literal 1 binary64))
(.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M)
(.f64 (.f64 (.f64 D (/.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) M) (*.f64 #s(literal -1/4 binary64) (/.f64 M d)))
(.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d))
(.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) d) (.f64 (/.f64 h l) #s(literal -1/4 binary64)))
(.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))
(.f64 (.f64 (*.f64 (/.f64 h l) D) #s(literal -1/4 binary64)) (/.f64 M d))
(.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D)
(.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D)
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(*.f64 (/.f64 h l) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
D
(*.f64 (/.f64 #s(literal 1/2 binary64) d) M)
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
d
M
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (sqrt.f64 d) (.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 h l)) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) #s(literal 1 binary64))))
(.f64 (fma.f64 (.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)) (fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 h l)) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) #s(literal 1 binary64)))
(fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 h l)) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) #s(literal 1 binary64))
(.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 h l)) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)))
(*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
(pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))
(/.f64 (/.f64 d D) M)
(/.f64 d D)
d
D
M
#s(literal -2 binary64)
(/.f64 h l)
h
l
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 (/.f64 d l) h))
(/.f64 (/.f64 d l) h)
(/.f64 d l)
(sqrt.f64 d)

localize247.0ms (1.2%)

Memory

32.4MiB live, 346.6MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
accuracy	0	(.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l))
accuracy	0	(*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)))
accuracy	0	(sqrt.f64 (/.f64 (/.f64 d l) h))
accuracy	0	(sqrt.f64 d)
accuracy	0	(.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D)
accuracy	0	(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
accuracy	0	(sqrt.f64 (/.f64 d l))
accuracy	0	(sqrt.f64 (/.f64 d h))
accuracy	0	(neg.f64 (sqrt.f64 (/.f64 d l)))
accuracy	0	(neg.f64 h)
accuracy	0	(neg.f64 d)
accuracy	0	#s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))
accuracy	0	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)
accuracy	0	(*.f64 l h)
accuracy	0	(sqrt.f64 (*.f64 l h))
accuracy	0	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
accuracy	0	(.f64 #s(literal -1/4 binary64) (.f64 M D))
accuracy	0	(sqrt.f64 (/.f64 d l))
accuracy	0	(sqrt.f64 (/.f64 d h))
accuracy	0	#s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d)))

Samples

168.0ms

256×

invalid

Compiler

Compiled 639 to 83 computations (87% saved)

Precisions

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

ival-mult: 62.0ms (48.3% of total)

ival-div: 24.0ms (18.7% of total)

ival-pow: 18.0ms (14% of total)

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

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

ival-neg: 3.0ms (2.3% of total)

ival-pow2: 3.0ms (2.3% of total)

ival-sub: 1.0ms (0.8% of total)

exact: 1.0ms (0.8% of total)

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

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

series295.0ms (1.4%)

Memory

32.5MiB live, 364.3MiB allocated

Counts

31 → 1 332

Calls

Call 1

Inputs
#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())
#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())
#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())
#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())
#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())
#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())
#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())
#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())
#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())
#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())
#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())

Outputs
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 h) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (* d h) l)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (* (pow d 3) (pow l 3))))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (* d h) l)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (* (pow d 3) (pow l 3))))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (* d h) l)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (* (pow d 3) (pow l 3))))))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor 0 h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor 0 h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor 0 h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor 0 h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor inf h) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (* (pow h 3) l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3))))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (* (pow h 3) l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3))))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (* (pow h 3) l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3))))))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf h) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (* (pow h 3) l))) (pow (sqrt -1) 2))) (* 1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3)))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (* (pow h 3) l))) (pow (sqrt -1) 2))) (* 1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3)))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (* (pow h 3) l))) (pow (sqrt -1) 2))) (* 1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3)))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor -inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor -inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor -inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor -inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 M) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor 0 M) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor 0 M) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor 0 M) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor 0 M) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor inf M) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l)))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l)))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l)))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor inf M) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor inf M) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor inf M) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor inf M) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf M) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l)))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l)))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l)))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor -inf M) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor -inf M) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor -inf M) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor -inf M) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor 0 l) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor 0 l) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor 0 l) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor 0 l) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor 0 l) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (* d (pow l 3)) h)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* h l) (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (* d (pow l 3)) h)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* h l) (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (* d (pow l 3)) h)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* h l) (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor inf l) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor inf l) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor inf l) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor inf l) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (patch (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 D) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor 0 D) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor 0 D) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor 0 D) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor 0 D) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor inf D) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l)))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l)))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l)))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor inf D) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor inf D) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor inf D) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor inf D) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf D) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l)))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l)))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l)))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor -inf D) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor -inf D) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor -inf D) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* D M)) (taylor -inf D) (#s(alt (.f64 #s(literal -1/4 binary64) (.f64 M D)) (patch (.f64 #s(literal -1/4 binary64) (.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D h) l)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (patch (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor 0 d) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor 0 d) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor 0 d) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor 0 d) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor 0 d) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* d h) (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* d h) (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* d h) (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor 0 d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor 0 d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor 0 d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor 0 d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))) (taylor inf d) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))) (taylor inf d) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))) (taylor inf d) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor inf d) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor inf d) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor inf d) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor inf d) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d (* h l)))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d (* h l)))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d (* h l)))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (* h l))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (patch (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (patch #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))) (taylor -inf d) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))) (taylor -inf d) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))) (taylor -inf d) (#s(alt (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (neg.f64 (sqrt.f64 (/.f64 d l))) (patch (neg.f64 (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (patch (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d (* h l)))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d (* h l)))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d (* h l)))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (patch (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor -inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor -inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor -inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor -inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (/.f64 d l) h)) (patch (sqrt.f64 (/.f64 (/.f64 d l) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
43.0ms	h	@	0	((* (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg (sqrt (/ d l))) (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (* (* (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (sqrt (/ d h))) (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (* (* (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (sqrt d)) (* (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) (sqrt (/ d h)) (sqrt (/ d l)) (* -1/4 (* M D)) (* l h) (neg d) (neg h) (* -1/2 (/ h l)) (* (* -1/2 (/ h l)) D) (sqrt d) (sqrt (/ (/ d l) h)) (* 1/4 (pow (/ (/ d D) M) -2)))
20.0ms	D	@	-inf	((* (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg (sqrt (/ d l))) (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (* (* (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (sqrt (/ d h))) (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (* (* (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (sqrt d)) (* (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) (sqrt (/ d h)) (sqrt (/ d l)) (* -1/4 (* M D)) (* l h) (neg d) (neg h) (* -1/2 (/ h l)) (* (* -1/2 (/ h l)) D) (sqrt d) (sqrt (/ (/ d l) h)) (* 1/4 (pow (/ (/ d D) M) -2)))
11.0ms	l	@	0	((* (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg (sqrt (/ d l))) (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (* (* (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (sqrt (/ d h))) (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (* (* (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (sqrt d)) (* (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) (sqrt (/ d h)) (sqrt (/ d l)) (* -1/4 (* M D)) (* l h) (neg d) (neg h) (* -1/2 (/ h l)) (* (* -1/2 (/ h l)) D) (sqrt d) (sqrt (/ (/ d l) h)) (* 1/4 (pow (/ (/ d D) M) -2)))
10.0ms	M	@	0	((* (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg (sqrt (/ d l))) (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (* (* (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (sqrt (/ d h))) (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (* (* (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (sqrt d)) (* (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) (sqrt (/ d h)) (sqrt (/ d l)) (* -1/4 (* M D)) (* l h) (neg d) (neg h) (* -1/2 (/ h l)) (* (* -1/2 (/ h l)) D) (sqrt d) (sqrt (/ (/ d l) h)) (* 1/4 (pow (/ (/ d D) M) -2)))
8.0ms	d	@	-inf	((* (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg (sqrt (/ d l))) (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (* (* (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (sqrt (/ d h))) (+ (* (* (* (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (/ 1/2 d)) M) D) 1) (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (* (* (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (sqrt d)) (* (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) (sqrt (/ d h)) (sqrt (/ d l)) (* -1/4 (* M D)) (* l h) (neg d) (neg h) (* -1/2 (/ h l)) (* (* -1/2 (/ h l)) D) (sqrt d) (sqrt (/ (/ d l) h)) (* 1/4 (pow (/ (/ d D) M) -2)))

simplify317.0ms (1.6%)

Memory

-25.2MiB live, 428.1MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	459	23512
1	1341	22879
2	4792	22718
0	8228	22157

Stop Event

1×	iter limit
1×	node limit

Counts

1 332 → 1 332

Calls

Call 1

Inputs
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(sqrt (/ d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(sqrt (/ d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(sqrt (/ d (* h l)))
(/ (+ (sqrt (/ (* d h) l)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (* (pow d 3) (pow l 3))))))) h)
(/ (+ (sqrt (/ (* d h) l)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (* (pow d 3) (pow l 3))))))) h)
(/ (+ (sqrt (/ (* d h) l)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (* (pow d 3) (pow l 3))))))) h)
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* h l)
(* h l)
(* h l)
(* h l)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(* h (+ (sqrt (/ d (* (pow h 3) l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3)))))))))
(* h (+ (sqrt (/ d (* (pow h 3) l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3)))))))))
(* h (+ (sqrt (/ d (* (pow h 3) l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3)))))))))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* h l)
(* h l)
(* h l)
(* h l)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (* (pow h 3) l))) (pow (sqrt -1) 2))) (* 1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3))))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (* (pow h 3) l))) (pow (sqrt -1) 2))) (* 1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3))))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (* (pow h 3) l))) (pow (sqrt -1) 2))) (* 1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3))))))))))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* h l)
(* h l)
(* h l)
(* h l)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1 h)
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d (* h l)))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l))))))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l))))))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(* -1 (sqrt (/ d l)))
(* -1 (sqrt (/ d l)))
(* -1 (sqrt (/ d l)))
(* -1 (sqrt (/ d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (/ (* d (pow l 3)) h)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* h l) (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (/ (* d (pow l 3)) h)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* h l) (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (/ (* d (pow l 3)) h)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* h l) (pow d 3)))))) (pow l 2))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* h l)
(* h l)
(* h l)
(* h l)
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* -1 (sqrt (/ d l)))
(* -1 (sqrt (/ d l)))
(* -1 (sqrt (/ d l)))
(* -1 (sqrt (/ d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d (* h l)))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* h l)
(* h l)
(* h l)
(* h l)
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* h l)
(* h l)
(* h l)
(* h l)
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d (* h l)))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l))))))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l))))))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/4 (* D M))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* -1/2 (/ (* D h) l))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(* -1 (sqrt (/ d l)))
(* -1 (sqrt (/ d l)))
(* -1 (sqrt (/ d l)))
(* -1 (sqrt (/ d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (/ (pow d 5) (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* d h) (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* d h) (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* d h) (pow l 3)))))) (pow d 2))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1 d)
(* -1 d)
(* -1 d)
(* -1 d)
(sqrt d)
(sqrt d)
(sqrt d)
(sqrt d)
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(sqrt (/ d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(sqrt (/ d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* -1 (sqrt (/ d l)))
(* -1 (sqrt (/ d l)))
(* -1 (sqrt (/ d l)))
(* -1 (sqrt (/ d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(sqrt (/ d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(sqrt (/ d (* h l)))
(* d (+ (sqrt (/ 1 (* d (* h l)))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d (* h l)))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d (* h l)))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 5) (pow l 3))))))))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1 d)
(* -1 d)
(* -1 d)
(* -1 d)
(sqrt d)
(sqrt d)
(sqrt d)
(sqrt d)
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(sqrt (/ d (* h l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d (* h l)))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d (* h l)))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d (* h l)))) (pow (sqrt -1) 2)))))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 d)
(* -1 d)
(* -1 d)
(* -1 d)
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))

Outputs
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (*.f64 h d))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (*.f64 h d))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (*.f64 h d))) h)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (*.f64 h d))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (*.f64 h d))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (*.f64 h d))) h)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(/ (+ (sqrt (/ (* d h) l)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (* (pow d 3) (pow l 3))))))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 M M)) (sqrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (*.f64 (/.f64 h l) d))) h)
(/ (+ (sqrt (/ (* d h) l)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (* (pow d 3) (pow l 3))))))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 M M)) (sqrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (*.f64 (/.f64 h l) d))) h)
(/ (+ (sqrt (/ (* d h) l)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (* (pow d 3) (pow l 3))))))) h)
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 M M)) (sqrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (*.f64 (/.f64 h l) d))) h)
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (*.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* h (+ (sqrt (/ d (* (pow h 3) l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 M M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))) l))) h)
(* h (+ (sqrt (/ d (* (pow h 3) l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 M M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))) l))) h)
(* h (+ (sqrt (/ d (* (pow h 3) l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 M M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))) l))) h)
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) l)) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) l)) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) l)) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) (neg.f64 h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) (neg.f64 h) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) (neg.f64 h) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) (neg.f64 h) #s(literal 1 binary64))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) l)) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) l)) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) l)) #s(literal 1/8 binary64) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) (neg.f64 h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) (neg.f64 h) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) (neg.f64 h) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) (neg.f64 h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) (neg.f64 h) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) (neg.f64 h) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) (neg.f64 h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (neg.f64 h))
(* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (*.f64 (neg.f64 M) M)) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (* (pow h 3) l))) (pow (sqrt -1) 2))) (* 1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3))))))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (.f64 (neg.f64 M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))) l))) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (* (pow h 3) l))) (pow (sqrt -1) 2))) (* 1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3))))))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (.f64 (neg.f64 M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))) l))) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (* (pow h 3) l))) (pow (sqrt -1) 2))) (* 1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ 1 (* (pow d 3) (* h (pow l 3))))))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (.f64 (neg.f64 M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))) l))) (neg.f64 h))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1 h)
(neg.f64 h)
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 M M))) (*.f64 M M))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 D h) D) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 D h) D) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 D h) D) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (*.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 M M))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 M M))) (*.f64 M M))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 D h) D) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 D h) D) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 D h) D) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 M M))
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (*.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (pow M 2) (+ (* -1/8 (* (pow D 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d (* h l))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (*.f64 (sqrt.f64 (/.f64 d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (*.f64 (sqrt.f64 (/.f64 d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (*.f64 (sqrt.f64 (/.f64 d h)) l)) l)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h) d) (/.f64 (.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h) d) (/.f64 (.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h) d) (/.f64 (.f64 D D) d) l) l)
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (pow.f64 l #s(literal 3 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (pow.f64 l #s(literal 3 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (pow.f64 l #s(literal 3 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))) (*.f64 l l))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (*.f64 (sqrt.f64 (/.f64 d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (*.f64 (sqrt.f64 (/.f64 d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (*.f64 (sqrt.f64 (/.f64 d h)) l)) l)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h) d) (/.f64 (.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h) d) (/.f64 (.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h) d) (/.f64 (.f64 D D) d) l) l)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h) d) (/.f64 (.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h) d) (/.f64 (.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h) d) (/.f64 (.f64 D D) d) l) l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (*.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (sqrt (/ (* d (pow l 3)) h)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* h l) (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64))) h)) (.f64 M M)) (sqrt.f64 (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h) d))) (*.f64 l l))
(/ (+ (sqrt (/ (* d (pow l 3)) h)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* h l) (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64))) h)) (.f64 M M)) (sqrt.f64 (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h) d))) (*.f64 l l))
(/ (+ (sqrt (/ (* d (pow l 3)) h)) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* h l) (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64))) h)) (.f64 M M)) (sqrt.f64 (.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h) d))) (*.f64 l l))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) h) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) h) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) h) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64))) (neg.f64 d)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (*.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (*.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (*.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(-.f64 (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (*.f64 (neg.f64 M) M)) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(-.f64 (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (*.f64 (neg.f64 M) M)) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(-.f64 (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (*.f64 (neg.f64 M) M)) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ h l))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (sqrt (/ d (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(+ (sqrt (/ d (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 D D))) (*.f64 D D))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (*.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 D D))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d)) (.f64 D D))) (*.f64 D D))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 (/.f64 (.f64 D D) l) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (.f64 M M)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (/.f64 d (.f64 D D)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (*.f64 D D))
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (*.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* (pow D 2) (+ (* -1/8 (* (pow M 2) (sqrt (/ h (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d (* h l))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/4 (* D M))
(.f64 (.f64 M D) #s(literal -1/4 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* -1/2 (/ (* D h) l))
(.f64 (.f64 (/.f64 h l) D) #s(literal -1/2 binary64))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 d d)) (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 d d)) (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 d d)) (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (.f64 d d))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 h (/.f64 (.f64 M M) l)) (.f64 d d)) (.f64 d d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (*.f64 M M) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (sqrt (/ (pow d 5) (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* d h) (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))) d)) (.f64 M M)) (sqrt.f64 (/.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l) h))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* d h) (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))) d)) (.f64 M M)) (sqrt.f64 (/.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l) h))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) (* h l))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (* d h) (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))) d)) (.f64 M M)) (sqrt.f64 (/.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l) h))) (.f64 d d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d))) d)
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d))) d)
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (.f64 M M))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (.f64 M M))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (.f64 M M))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) d)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d))) d)
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d))) d)
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(* d (+ (sqrt (/ 1 (* d (* h l)))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 5) (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d) h))) d)
(* d (+ (sqrt (/ 1 (* d (* h l)))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 5) (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d) h))) d)
(* d (+ (sqrt (/ 1 (* d (* h l)))) (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (* (pow d 5) (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (*.f64 M M)) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d) h))) d)
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(sqrt (/ d (* h l)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (neg.f64 d))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d)))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d)))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d)))) (neg.f64 d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (neg.f64 d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) (neg.f64 d))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) (neg.f64 d))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) (neg.f64 d))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (.f64 M M))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (.f64 M M))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (.f64 M M))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 d))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d)))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d)))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d)))) (neg.f64 d))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) (* d l)))
(.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (neg.f64 d))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d)))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d)))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) d)))) (neg.f64 d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) d) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (neg.f64 d))
(* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d (* h l)))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (*.f64 (neg.f64 M) M)) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d) h)))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d (* h l)))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (*.f64 (neg.f64 M) M)) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d) h)))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (sqrt (/ h (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d (* h l)))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (*.f64 (neg.f64 M) M)) (sqrt.f64 (/.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d) h)))) (neg.f64 d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 M M) h)) l) (/.f64 (/.f64 (*.f64 D D) d) d))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(sqrt.f64 d)
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(sqrt.f64 d)
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(sqrt.f64 d)
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(sqrt.f64 d)
(* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(* -1 (* (sqrt (/ d (* h l))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 (/.f64 d l) h))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) d) (/.f64 (.f64 D D) d))

rewrite191.0ms (0.9%)

Memory

2.6MiB live, 278.2MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	91	520
0	144	530
1	446	492
2	3114	465
0	8540	455

Stop Event

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

Counts

31 → 943

Calls

Call 1

Inputs
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))
#s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))
(sqrt.f64 (*.f64 l h))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d)))
#s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
(fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64))
(fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (fma.f64 (.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l))
(sqrt.f64 (/.f64 d h))
(sqrt.f64 (/.f64 d l))
(.f64 #s(literal -1/4 binary64) (.f64 M D))
(*.f64 l h)
(neg.f64 d)
(neg.f64 h)
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D)
(sqrt.f64 d)
(sqrt.f64 (/.f64 (/.f64 d l) h))
(*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)))

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval385.0ms (1.9%)

Memory: -18.0MiB live, 467.1MiB allocated
Compiler: Compiled 72 054 to 4 367 computations (93.9% saved)

prune188.0ms (0.9%)

Memory

-28.4MiB live, 396.8MiB allocated

Pruning

67 alts after pruning (62 fresh and 5 done)

	Pruned	Kept	Total
New	2 440	22	2 462
Fresh	13	40	53
Picked	2	3	5
Done	1	2	3
Total	2 456	67	2 523

Accuracy

97.1%

Counts

2 523 → 67

Alt Table

Click to see full alt table

Status	Accuracy	Program
	48.4%	(fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h) (.f64 (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	41.2%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) d) (*.f64 M D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	32.1%	(/.f64 (.f64 (.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
	14.7%	(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	1.4%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	26.5%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	4.5%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	5.2%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
	5.1%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
✓	4.5%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	4.5%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	10.0%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
	55.5%	(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	36.3%	(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
	55.1%	(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	59.0%	(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #s(literal -1/2 binary64)) h) (pow.f64 l #s(literal -1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	55.5%	(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) M) (/.f64 #s(literal 1/2 binary64) d)) (.f64 D (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	52.7%	(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	36.1%	(.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) (/.f64 h l)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
	35.1%	(.f64 (/.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
	26.8%	(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 D M) #s(literal 1/2 binary64)) (.f64 D M)) (.f64 d (*.f64 #s(literal 2 binary64) d))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
	64.5%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) (.f64 #s(literal 1/2 binary64) M)) d) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	42.2%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))) (sqrt.f64 (/.f64 d l)))
	37.9%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))
	41.2%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))
	33.9%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 l #s(literal -1/4 binary64)) #s(literal 2 binary64))))
	29.8%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) M) (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
	67.3%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	31.1%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (/.f64 D d) M) (.f64 (*.f64 (/.f64 D d) M) #s(literal 1/4 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
	66.5%	(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(approx (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	34.1%	(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
✓	66.9%	(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	34.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	34.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (pow.f64 l #s(literal -1/2 binary64)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	42.6%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	38.3%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	42.6%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	24.9%	(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	10.0%	(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
	44.3%	(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	44.1%	(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	23.5%	(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	17.9%	(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 d l)))
	21.4%	(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)) (sqrt.f64 (/.f64 d l)))
	42.2%	(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	6.3%	(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
	17.3%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
	27.3%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	38.8%	#s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (* (/ (/ d l) h) d))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	17.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
	42.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
	20.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
	19.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
	22.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
	4.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
	36.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
	26.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
	25.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1/4 binary64)) #s(literal 2 binary64)) d))
	22.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
✓	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	16.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
✓	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	26.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 #s(approx (+ ( (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)))) h))
	35.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	36.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))

Compiler

Compiled 5 061 to 1 943 computations (61.6% saved)

regimes360.0ms (1.8%)

Memory

49.8MiB live, 467.4MiB allocated

Counts

139 → 4

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 D M) #s(literal 1/2 binary64)) (.f64 D M)) (.f64 d (*.f64 #s(literal 2 binary64) d))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(approx (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (/.f64 D d) M) (.f64 (*.f64 (/.f64 D d) M) #s(literal 1/4 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) M) (/.f64 #s(literal 1/2 binary64) d)) (.f64 D (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (/.f64 h l)) (.f64 (.f64 #s(literal -1/2 binary64) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) M) (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) (.f64 #s(literal 1/2 binary64) M)) d) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (/.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (pow.f64 h #s(literal -1/2 binary64)) (sqrt.f64 l)) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 h #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (pow.f64 (.f64 (.f64 l h) (*.f64 l h)) #s(literal 1/4 binary64))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (.f64 (/.f64 d l) d)) (pow.f64 h #s(literal -1/2 binary64))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (pow.f64 (neg.f64 h) #s(literal -1/2 binary64))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 #s(approx (+ ( (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (pow.f64 l #s(literal -1 binary64)))) (sqrt.f64 (neg.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 #s(approx (+ ( (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)))) h))
(.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) (/.f64 h l)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
(.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
#s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (* (/ (/ d l) h) d))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) d) (*.f64 M D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(/.f64 (.f64 (.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) d) (*.f64 M D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1/4 binary64)) #s(literal 2 binary64)) d))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (sqrt.f64 h))
(fma.f64 (/.f64 d (sqrt.f64 (.f64 l h))) #s(literal 1 binary64) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)))))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #s(literal -1/2 binary64)) h) (pow.f64 l #s(literal -1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (pow.f64 h #s(literal -1/2 binary64)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) h)) (pow.f64 l #s(literal -1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) D)) (*.f64 d d))))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) D)) (/.f64 #s(literal 1 binary64) (.f64 d d)))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 M (.f64 #s(literal 1/4 binary64) D)) h) d))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 D M)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 d d)) (.f64 D M)))))
(fma.f64 (.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h) (.f64 (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (.f64 (.f64 (/.f64 D d) #s(literal 1/2 binary64)) (.f64 M (/.f64 h l))) #s(literal 1 binary64)))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) l) h #s(literal 1 binary64)))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) h) #s(literal 1/2 binary64)) l)))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) #s(literal 1/4 binary64)) d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) d)))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (pow.f64 l #s(literal -1/2 binary64)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 h #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 d l)))
(.f64 (pow.f64 d #s(literal 1/4 binary64)) (.f64 (pow.f64 h #s(literal -1/4 binary64)) (.f64 (.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 l #s(literal -1/4 binary64)) #s(literal 2 binary64))))

Outputs
(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))

Calls

7 calls:

71.0ms	l
66.0ms	D
49.0ms	h
48.0ms	M
40.0ms	(*.f64 M D)

Results

Accuracy	Segments	Branch
85.3%	4	`d`
84.4%	4	`h`
83.3%	3	`l`
69.4%	1	`M`
69.4%	1	`D`
73.4%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
69.4%	1	`(*.f64 M D)`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes127.0ms (0.6%)

Memory

-0.8MiB live, 207.1MiB allocated

Counts

128 → 3

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 D M) #s(literal 1/2 binary64)) (.f64 D M)) (.f64 d (*.f64 #s(literal 2 binary64) d))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(approx (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (/.f64 D d) M) (.f64 (*.f64 (/.f64 D d) M) #s(literal 1/4 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) M) (/.f64 #s(literal 1/2 binary64) d)) (.f64 D (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (/.f64 h l)) (.f64 (.f64 #s(literal -1/2 binary64) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) M) (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) (.f64 #s(literal 1/2 binary64) M)) d) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (/.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (pow.f64 h #s(literal -1/2 binary64)) (sqrt.f64 l)) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 h #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (pow.f64 (.f64 (.f64 l h) (*.f64 l h)) #s(literal 1/4 binary64))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (.f64 (/.f64 d l) d)) (pow.f64 h #s(literal -1/2 binary64))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (pow.f64 (neg.f64 h) #s(literal -1/2 binary64))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 #s(approx (+ ( (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (pow.f64 l #s(literal -1 binary64)))) (sqrt.f64 (neg.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 #s(approx (+ ( (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)))) h))
(.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) (/.f64 h l)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
(.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
#s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (* (/ (/ d l) h) d))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) d) (*.f64 M D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(/.f64 (.f64 (.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) d) (*.f64 M D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1/4 binary64)) #s(literal 2 binary64)) d))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (sqrt.f64 h))
(fma.f64 (/.f64 d (sqrt.f64 (.f64 l h))) #s(literal 1 binary64) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)))))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #s(literal -1/2 binary64)) h) (pow.f64 l #s(literal -1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (pow.f64 h #s(literal -1/2 binary64)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) h)) (pow.f64 l #s(literal -1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) D)) (*.f64 d d))))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) D)) (/.f64 #s(literal 1 binary64) (.f64 d d)))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 M (.f64 #s(literal 1/4 binary64) D)) h) d))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 D M)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 d d)) (.f64 D M)))))
(fma.f64 (.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h) (.f64 (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (.f64 (.f64 (/.f64 D d) #s(literal 1/2 binary64)) (.f64 M (/.f64 h l))) #s(literal 1 binary64)))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))

Outputs

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))

(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))

(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))

Calls

3 calls:

44.0ms	d
39.0ms	h
35.0ms	l

Results

Accuracy	Segments	Branch
84.1%	4	`h`
82.8%	3	`l`
82.4%	3	`d`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes87.0ms (0.4%)

Memory

-24.1MiB live, 87.8MiB allocated

Counts

126 → 3

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 D M) #s(literal 1/2 binary64)) (.f64 D M)) (.f64 d (*.f64 #s(literal 2 binary64) d))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(approx (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (/.f64 D d) M) (.f64 (*.f64 (/.f64 D d) M) #s(literal 1/4 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) M) (/.f64 #s(literal 1/2 binary64) d)) (.f64 D (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (/.f64 h l)) (.f64 (.f64 #s(literal -1/2 binary64) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) M) (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) (.f64 #s(literal 1/2 binary64) M)) d) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (/.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (pow.f64 h #s(literal -1/2 binary64)) (sqrt.f64 l)) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 h #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (pow.f64 (.f64 (.f64 l h) (*.f64 l h)) #s(literal 1/4 binary64))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (.f64 (/.f64 d l) d)) (pow.f64 h #s(literal -1/2 binary64))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (pow.f64 (neg.f64 h) #s(literal -1/2 binary64))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 #s(approx (+ ( (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (pow.f64 l #s(literal -1 binary64)))) (sqrt.f64 (neg.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 #s(approx (+ ( (* (* (sqrt (/ 1 (* (pow l 3) h))) (* M M)) (* D D)) (/ 1/8 d)) (* (neg d) (sqrt (/ 1 (* (pow h 3) l))))) (.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)))) h))
(.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) (/.f64 h l)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
(.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
#s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (* (/ (/ d l) h) d))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) d) (*.f64 M D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(/.f64 (.f64 (.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) d) (*.f64 M D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1/4 binary64)) #s(literal 2 binary64)) d))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (sqrt.f64 h))
(fma.f64 (/.f64 d (sqrt.f64 (.f64 l h))) #s(literal 1 binary64) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)))))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (/.f64 (.f64 M M) l)) (sqrt.f64 (.f64 h d)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #s(literal -1/2 binary64)) h) (pow.f64 l #s(literal -1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (pow.f64 h #s(literal -1/2 binary64)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) h)) (pow.f64 l #s(literal -1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 M M)) (.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) D)) (*.f64 d d))))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 M M)) D)) (/.f64 #s(literal 1 binary64) (.f64 d d)))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 M (.f64 #s(literal 1/4 binary64) D)) h) d))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 D M)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 d d)) (.f64 D M)))))
(fma.f64 (.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h) (.f64 (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (.f64 (.f64 (/.f64 D d) #s(literal 1/2 binary64)) (.f64 M (/.f64 h l))) #s(literal 1 binary64)))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))

Outputs

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))

(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))

Calls

2 calls:

37.0ms	l
33.0ms	h

Results

Accuracy	Segments	Branch
80.3%	2	`h`
82.4%	3	`l`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes68.0ms (0.3%)

Memory

27.9MiB live, 69.9MiB allocated

Counts

70 → 3

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 D M) #s(literal 1/2 binary64)) (.f64 D M)) (.f64 d (*.f64 #s(literal 2 binary64) d))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(approx (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (/.f64 D d) M) (.f64 (*.f64 (/.f64 D d) M) #s(literal 1/4 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) M) (/.f64 #s(literal 1/2 binary64) d)) (.f64 D (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (/.f64 h l)) (.f64 (.f64 #s(literal -1/2 binary64) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) M) (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) (.f64 #s(literal 1/2 binary64) M)) d) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (/.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (pow.f64 h #s(literal -1/2 binary64)) (sqrt.f64 l)) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 h #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (pow.f64 (.f64 (.f64 l h) (*.f64 l h)) #s(literal 1/4 binary64))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (.f64 (/.f64 d l) d)) (pow.f64 h #s(literal -1/2 binary64))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))) (sqrt.f64 (/.f64 d l)))

Outputs

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))) (sqrt.f64 (/.f64 d l)))

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))

Calls

2 calls:

44.0ms	d
19.0ms	l

Results

Accuracy	Segments	Branch
80.2%	2	`d`
82.4%	3	`l`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes74.0ms (0.4%)

Memory

-18.0MiB live, 136.9MiB allocated

Counts

69 → 2

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 D M) #s(literal 1/2 binary64)) (.f64 D M)) (.f64 d (*.f64 #s(literal 2 binary64) d))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(approx (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (/.f64 D d) M) (.f64 (*.f64 (/.f64 D d) M) #s(literal 1/4 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) M) (/.f64 #s(literal 1/2 binary64) d)) (.f64 D (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (/.f64 h l)) (.f64 (.f64 #s(literal -1/2 binary64) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) M) (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) (.f64 #s(literal 1/2 binary64) M)) d) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (/.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (pow.f64 h #s(literal -1/2 binary64)) (sqrt.f64 l)) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 h #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (pow.f64 (.f64 (.f64 l h) (*.f64 l h)) #s(literal 1/4 binary64))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (.f64 (/.f64 d l) d)) (pow.f64 h #s(literal -1/2 binary64))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))

Outputs

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))

Calls

3 calls:

23.0ms	d
22.0ms	h
21.0ms	l

Results

Accuracy	Segments	Branch
79.1%	2	`d`
79.1%	2	`h`
79.1%	2	`l`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes78.0ms (0.4%)

Memory

28.3MiB live, 102.4MiB allocated

Counts

68 → 2

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 D M) #s(literal 1/2 binary64)) (.f64 D M)) (.f64 d (*.f64 #s(literal 2 binary64) d))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(approx (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (/.f64 D d) M) (.f64 (*.f64 (/.f64 D d) M) #s(literal 1/4 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) M) (/.f64 #s(literal 1/2 binary64) d)) (.f64 D (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (/.f64 h l)) (.f64 (.f64 #s(literal -1/2 binary64) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) M) (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) (.f64 #s(literal 1/2 binary64) M)) d) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (/.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (pow.f64 h #s(literal -1/2 binary64)) (sqrt.f64 l)) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 h #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (pow.f64 (.f64 (.f64 l h) (*.f64 l h)) #s(literal 1/4 binary64))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (.f64 (/.f64 d l) d)) (pow.f64 h #s(literal -1/2 binary64))))

Outputs

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (*.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))

Calls

3 calls:

35.0ms	d
20.0ms	h
19.0ms	l

Results

Accuracy	Segments	Branch
76.0%	2	`l`
75.7%	2	`d`
75.7%	2	`h`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes88.0ms (0.4%)

Memory

-10.9MiB live, 105.6MiB allocated

Counts

66 → 3

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 D M) #s(literal 1/2 binary64)) (.f64 D M)) (.f64 d (*.f64 #s(literal 2 binary64) d))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(approx (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (/.f64 D d) M) (.f64 (*.f64 (/.f64 D d) M) #s(literal 1/4 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) M) (/.f64 #s(literal 1/2 binary64) d)) (.f64 D (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (/.f64 h l)) (.f64 (.f64 #s(literal -1/2 binary64) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) M) (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) (.f64 #s(literal 1/2 binary64) M)) d) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (/.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (pow.f64 h #s(literal -1/2 binary64)) (sqrt.f64 l)) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 h #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (pow.f64 (.f64 (.f64 l h) (*.f64 l h)) #s(literal 1/4 binary64))))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))

Outputs

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (*.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))

(*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (*.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))

Calls

3 calls:

32.0ms	l
31.0ms	h
21.0ms	d

Results

Accuracy	Segments	Branch
75.6%	3	`d`
73.7%	2	`h`
76.4%	3	`l`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes25.0ms (0.1%)

Memory

20.1MiB live, 55.7MiB allocated

Counts

65 → 3

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 D M) #s(literal 1/2 binary64)) (.f64 D M)) (.f64 d (*.f64 #s(literal 2 binary64) d))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(approx (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (/.f64 D d) M) (.f64 (*.f64 (/.f64 D d) M) #s(literal 1/4 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) M) (/.f64 #s(literal 1/2 binary64) d)) (.f64 D (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (/.f64 h l)) (.f64 (.f64 #s(literal -1/2 binary64) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) M) (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) (.f64 #s(literal 1/2 binary64) M)) d) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
(.f64 (/.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (pow.f64 h #s(literal -1/2 binary64)) (sqrt.f64 l)) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 h #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (pow.f64 (.f64 (.f64 l h) (*.f64 l h)) #s(literal 1/4 binary64))))

Outputs

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (*.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))

(*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (*.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

1 calls:

21.0ms

Results

Accuracy	Segments	Branch
76.0%	3	`l`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes32.0ms (0.2%)

Memory

-24.4MiB live, 54.9MiB allocated

Counts

61 → 3

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 D M) #s(literal 1/2 binary64)) (.f64 D M)) (.f64 d (*.f64 #s(literal 2 binary64) d))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(approx (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (/.f64 D d) M) (.f64 (*.f64 (/.f64 D d) M) #s(literal 1/4 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) M) (/.f64 #s(literal 1/2 binary64) d)) (.f64 D (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (/.f64 h l)) (.f64 (.f64 #s(literal -1/2 binary64) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) M) (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) D) (.f64 #s(literal 1/2 binary64) M)) d) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))

Outputs

(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (*.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))

(*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (*.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

1 calls:

26.0ms

Results

Accuracy	Segments	Branch
75.8%	3	`l`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes37.0ms (0.2%)

Memory

3.2MiB live, 75.0MiB allocated

Counts

51 → 3

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 D M) #s(literal 1/2 binary64)) (.f64 D M)) (.f64 d (*.f64 #s(literal 2 binary64) d))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))
(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 #s(approx (* (* (* -1/2 (/ h l)) D) (* (/ 1/2 d) M)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (*.f64 M h)) l) (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (/.f64 D d) M) (.f64 (*.f64 (/.f64 D d) M) #s(literal 1/4 binary64))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))

Outputs

(*.f64 (*.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M D)) l) (/.f64 h d))) (*.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))

(*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (*.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

2 calls:

17.0ms	d
17.0ms	l

Results

Accuracy	Segments	Branch
72.7%	2	`d`
75.5%	3	`l`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes403.0ms (2%)

Memory

-134.1MiB live, 243.4MiB allocated

Counts

48 → 4

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 D M) #s(literal 1/2 binary64)) (.f64 D M)) (.f64 d (*.f64 #s(literal 2 binary64) d))) (/.f64 h l)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d l) h))) (sqrt.f64 d))

Outputs
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

7 calls:

292.0ms	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
25.0ms	M
22.0ms	d
16.0ms	l
15.0ms	D

Results

Accuracy	Segments	Branch
61.0%	2	`M`
59.5%	2	`D`
61.9%	2	`(*.f64 M D)`
68.0%	3	`d`
68.6%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
66.9%	2	`h`
70.8%	4	`l`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes18.0ms (0.1%)

Memory

7.4MiB live, 45.1MiB allocated

Counts

46 → 4

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))

Outputs
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

1 calls:

15.0ms

Results

Accuracy	Segments	Branch
70.4%	4	`l`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes74.0ms (0.4%)

Memory

-20.3MiB live, 151.5MiB allocated

Counts

45 → 4

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))

Outputs
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

4 calls:

29.0ms	h
14.0ms	l
13.0ms	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
13.0ms	d

Results

Accuracy	Segments	Branch
67.3%	3	`d`
65.3%	2	`h`
66.7%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
69.3%	4	`l`

Compiler

Compiled 38 to 37 computations (2.6% saved)

regimes65.0ms (0.3%)

Memory

22.9MiB live, 174.2MiB allocated

Counts

44 → 4

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))

Outputs
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

4 calls:

20.0ms	h
16.0ms	d
14.0ms	l
12.0ms	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))

Results

Accuracy	Segments	Branch
65.5%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
64.5%	3	`h`
66.5%	4	`d`
68.3%	4	`l`

Compiler

Compiled 38 to 37 computations (2.6% saved)

regimes16.0ms (0.1%)

Memory

1.0MiB live, 39.9MiB allocated

Counts

42 → 4

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (*.f64 M M) d) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 (.f64 #s(approx (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))

Outputs
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

1 calls:

13.0ms

Results

Accuracy	Segments	Branch
68.0%	4	`l`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes14.0ms (0.1%)

Memory

0.4MiB live, 39.4MiB allocated

Counts

38 → 4

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))

Outputs
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

1 calls:

12.0ms

Results

Accuracy	Segments	Branch
67.9%	4	`l`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes50.0ms (0.2%)

Memory

-17.0MiB live, 142.6MiB allocated

Counts

37 → 4

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))

Outputs
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

4 calls:

14.0ms	l
12.0ms	d
11.0ms	h
10.0ms	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))

Results

Accuracy	Segments	Branch
61.8%	2	`h`
61.8%	2	`d`
64.9%	4	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
65.9%	4	`l`

Compiler

Compiled 38 to 37 computations (2.6% saved)

regimes14.0ms (0.1%)

Memory

4.4MiB live, 44.9MiB allocated

Counts

36 → 3

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (.f64 l h)))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) d)) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) h)) (/.f64 (*.f64 h h) (+.f64 #s(literal 0 binary64) h)))))

Outputs

(/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))

(*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (*.f64 (*.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (*.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

1 calls:

12.0ms

Results

Accuracy	Segments	Branch
64.0%	3	`l`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes97.0ms (0.5%)

Memory

4.5MiB live, 119.1MiB allocated

Counts

33 → 3

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 d)))))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (/.f64 (/.f64 (neg.f64 d) l) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))

Outputs

(/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

7 calls:

36.0ms	h
11.0ms	D
10.0ms	(*.f64 M D)
10.0ms	M
9.0ms	d

Results

Accuracy	Segments	Branch
42.8%	1	`D`
45.6%	2	`M`
48.2%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
49.5%	2	`h`
52.4%	3	`d`
45.4%	2	`(*.f64 M D)`
49.5%	2	`l`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes29.0ms (0.1%)

Memory

-10.7MiB live, 44.5MiB allocated

Counts

26 → 3

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) #s(approx (sqrt (* (/ d l) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))))))

Outputs

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

3 calls:

11.0ms	h
8.0ms	d
8.0ms	l

Results

Accuracy	Segments	Branch
49.5%	3	`h`
49.7%	3	`l`
50.6%	3	`d`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes8.0ms (0%)

Memory

16.5MiB live, 16.5MiB allocated

Counts

22 → 3

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
(.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(.f64 #s(approx ( (+ (* (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (* (* M (/ 1/2 d)) D)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(.f64 #s(approx ( (+ (* (* (* 1/4 (pow (/ (/ d D) M) -2)) (/ h l)) -1/2) 1) (sqrt (/ (/ d l) h))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 d))
(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))

Outputs

(*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

1 calls:

7.0ms

Results

Accuracy	Segments	Branch
50.6%	3	`d`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes21.0ms (0.1%)

Memory

-5.8MiB live, 32.5MiB allocated

Counts

14 → 3

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt h) (sqrt (* (/ d l) d))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 (/.f64 d l) (neg.f64 d)) (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))

Outputs

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

4 calls:

6.0ms	d
5.0ms	l
5.0ms	h
4.0ms	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))

Results

Accuracy	Segments	Branch
48.2%	3	`h`
48.7%	3	`l`
44.7%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
47.9%	3	`d`

Compiler

Compiled 38 to 37 computations (2.6% saved)

regimes18.0ms (0.1%)

Memory

-3.6MiB live, 34.1MiB allocated

Counts

6 → 2

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Outputs

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))

Calls

6 calls:

4.0ms	M
3.0ms	d
3.0ms	D
3.0ms	(*.f64 M D)
3.0ms	l

Results

Accuracy	Segments	Branch
29.1%	2	`D`
27.3%	1	`(*.f64 M D)`
33.0%	3	`M`
44.2%	2	`d`
42.7%	2	`h`
44.1%	2	`l`

Compiler

Compiled 8 to 31 computations (-287.5% saved)

regimes10.0ms (0%)

Memory

14.9MiB live, 14.9MiB allocated

Counts

5 → 2

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))

Outputs

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

Calls

4 calls:

2.0ms	d
2.0ms	l
2.0ms	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
2.0ms	h

Results

Accuracy	Segments	Branch
41.3%	2	`h`
32.0%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
42.7%	2	`l`
42.5%	2	`d`

Compiler

Compiled 38 to 37 computations (2.6% saved)

regimes15.0ms (0.1%)

Memory

-6.7MiB live, 31.9MiB allocated

Accuracy

Total -0.0b remaining (-0.1%)

Threshold costs -0b (-0.1%)

Counts

3 → 1

Calls

Call 1

Inputs

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))

#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d))

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

Calls

7 calls:

3.0ms	h
2.0ms	M
2.0ms	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
2.0ms	D
2.0ms	l

Results

Accuracy	Segments	Branch
25.7%	1	`(*.f64 M D)`
25.7%	1	`D`
25.7%	1	`M`
25.7%	1	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
25.7%	1	`h`
25.7%	1	`d`
25.7%	1	`l`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

bsearch174.0ms (0.9%)

Memory

4.3MiB live, 202.9MiB allocated

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
61.0ms	3.371223776284776e-266	1.411477864199465e-258
44.0ms	-1.0676697629519882e-298	-1.2063277558796614e-300
53.0ms	-6.415808878664227e-176	-5.178232933335083e-184

Samples

79.0ms	400×	0	valid
49.0ms	369×	0	invalid

Compiler

Compiled 1 766 to 1 356 computations (23.2% saved)

Precisions

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

ival-div: 31.0ms (31.6% of total)

ival-pow: 29.0ms (29.6% of total)

ival-mult: 25.0ms (25.5% of total)

ival-pow2: 8.0ms (8.2% of total)

ival-sub: 4.0ms (4.1% of total)

ival-true: 1.0ms (1% of total)

exact: 1.0ms (1% of total)

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

bsearch166.0ms (0.8%)

Memory

-8.3MiB live, 223.8MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
67.0ms	-1.3988323809623276e-295	3.343014242256829e-303
69.0ms	-5.295858221773564e+137	-2.1440375932701163e+132

Samples

64.0ms	304×	0	valid
50.0ms	260×	0	invalid

Compiler

Compiled 1 408 to 1 030 computations (26.8% saved)

Precisions

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

ival-pow: 25.0ms (30.4% of total)

ival-mult: 24.0ms (29.2% of total)

ival-div: 23.0ms (28% of total)

ival-pow2: 6.0ms (7.3% of total)

ival-sub: 3.0ms (3.7% of total)

ival-true: 1.0ms (1.2% of total)

exact: 1.0ms (1.2% of total)

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

bsearch6.0ms (0%)

Memory

7.1MiB live, 7.1MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	-1.3988323809623276e-295	3.343014242256829e-303
2.0ms	-5.295858221773564e+137	-2.1440375932701163e+132

Compiler

Compiled 1 348 to 960 computations (28.8% saved)

bsearch18.0ms (0.1%)

Memory

17.3MiB live, 17.3MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	-1.3988323809623276e-295	3.343014242256829e-303
14.0ms	-5.295858221773564e+137	-2.1440375932701163e+132

Samples

5.0ms	32×	0	valid
5.0ms	32×	0	invalid

Compiler

Compiled 1 348 to 960 computations (28.8% saved)

Precisions

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

ival-div: 2.0ms (26.7% of total)

ival-mult: 2.0ms (26.7% of total)

ival-pow: 2.0ms (26.7% of total)

ival-pow2: 1.0ms (13.4% of total)

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

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

exact: 0.0ms (0% of total)

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

bsearch90.0ms (0.4%)

Memory

-22.3MiB live, 65.0MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
83.0ms	-4.402911279316348e-303	1.938680975559599e-306

Samples

42.0ms	144×	0	valid
32.0ms	119×	0	invalid

Compiler

Compiled 650 to 462 computations (28.9% saved)

Precisions

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

ival-mult: 41.0ms (64.6% of total)

ival-div: 10.0ms (15.7% of total)

ival-pow: 9.0ms (14.2% of total)

ival-pow2: 3.0ms (4.7% of total)

ival-sub: 1.0ms (1.6% of total)

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

exact: 0.0ms (0% of total)

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

bsearch68.0ms (0.3%)

Memory

7.6MiB live, 80.4MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
63.0ms	1.5491954421701545e-230	6.0463565019501995e-229

Samples

32.0ms	112×	0	valid
16.0ms	108×	0	invalid

Compiler

Compiled 486 to 366 computations (24.7% saved)

Precisions

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

ival-pow: 21.0ms (53.2% of total)

ival-div: 8.0ms (20.3% of total)

ival-mult: 7.0ms (17.7% of total)

ival-pow2: 2.0ms (5.1% of total)

ival-sub: 1.0ms (2.5% of total)

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

exact: 0.0ms (0% of total)

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

bsearch127.0ms (0.6%)

Memory

-4.9MiB live, 117.9MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
101.0ms	4.359134021990998e+132	8.747428253803227e+146
2.0ms	-1.3988323809623276e-295	3.343014242256829e-303

Samples

44.0ms	179×	0	invalid
44.0ms	160×	0	valid

Compiler

Compiled 1 318 to 1 030 computations (21.9% saved)

Precisions

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

ival-div: 30.0ms (52% of total)

ival-mult: 11.0ms (19.1% of total)

ival-pow: 11.0ms (19.1% of total)

ival-pow2: 3.0ms (5.2% of total)

ival-sub: 2.0ms (3.5% of total)

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

exact: 0.0ms (0% of total)

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

bsearch103.0ms (0.5%)

Memory

3.4MiB live, 119.5MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
76.0ms	2.1868233623302626e+194	1.2575567309135555e+200
2.0ms	-1.3988323809623276e-295	3.343014242256829e-303

Samples

32.0ms	155×	0	invalid
23.0ms	144×	0	valid

Compiler

Compiled 1 028 to 873 computations (15.1% saved)

Precisions

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

ival-pow2: 12.0ms (27.2% of total)

ival-div: 11.0ms (24.9% of total)

ival-mult: 10.0ms (22.6% of total)

ival-pow: 9.0ms (20.4% of total)

ival-sub: 1.0ms (2.3% of total)

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

exact: 0.0ms (0% of total)

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

bsearch160.0ms (0.8%)

Memory

19.8MiB live, 181.7MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
72.0ms	1.8039940652619246e+202	6.8013435092528095e+205
77.0ms	5.3297441913075795e-260	1.3215444046393736e-257

Samples

69.0ms	246×	0	invalid
63.0ms	240×	0	valid

Compiler

Compiled 739 to 638 computations (13.7% saved)

Precisions

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

ival-div: 63.0ms (61.6% of total)

ival-mult: 16.0ms (15.7% of total)

ival-pow: 15.0ms (14.7% of total)

ival-pow2: 5.0ms (4.9% of total)

ival-sub: 2.0ms (2% of total)

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

exact: 0.0ms (0% of total)

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

bsearch4.0ms (0%)

Memory

2.5MiB live, 2.5MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.8039940652619246e+202	6.8013435092528095e+205
1.0ms	5.3297441913075795e-260	1.3215444046393736e-257

Compiler

Compiled 739 to 638 computations (13.7% saved)

bsearch244.0ms (1.2%)

Memory

-34.9MiB live, 132.7MiB allocated

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.8039940652619246e+202	6.8013435092528095e+205
74.0ms	3.970866803155763e-283	1.041298200602783e-277
118.0ms	-3.0735892676257658e+106	-1.6657846485504316e+101

Samples

107.0ms	288×	0	valid
63.0ms	317×	0	invalid

Compiler

Compiled 1 253 to 1 040 computations (17% saved)

Precisions

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

ival-pow2: 58.0ms (42.1% of total)

ival-mult: 36.0ms (26.1% of total)

ival-div: 21.0ms (15.2% of total)

ival-pow: 19.0ms (13.8% of total)

ival-sub: 3.0ms (2.2% of total)

ival-true: 1.0ms (0.7% of total)

exact: 1.0ms (0.7% of total)

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

bsearch138.0ms (0.7%)

Memory

14.2MiB live, 86.1MiB allocated

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
48.0ms	1.8039940652619246e+202	6.8013435092528095e+205
82.0ms	-1.7146478640901586e-289	-1.3988323809623276e-295
2.0ms	-3.0735892676257658e+106	-1.6657846485504316e+101

Samples

23.0ms	144×	0	valid
18.0ms	125×	0	invalid

Compiler

Compiled 1 253 to 1 058 computations (15.6% saved)

Precisions

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

ival-div: 10.0ms (31.2% of total)

ival-mult: 9.0ms (28.1% of total)

ival-pow: 9.0ms (28.1% of total)

ival-pow2: 3.0ms (9.4% of total)

ival-sub: 1.0ms (3.1% of total)

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

exact: 0.0ms (0% of total)

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

bsearch93.0ms (0.5%)

Memory

-4.3MiB live, 82.0MiB allocated

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.8039940652619246e+202	6.8013435092528095e+205
2.0ms	-1.7146478640901586e-289	-1.3988323809623276e-295
84.0ms	-3.0735892676257658e+106	-1.6657846485504316e+101

Samples

48.0ms	128×	0	valid
27.0ms	120×	0	invalid

Compiler

Compiled 1 253 to 1 058 computations (15.6% saved)

Precisions

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

ival-mult: 35.0ms (53.7% of total)

ival-sub: 10.0ms (15.3% of total)

ival-div: 9.0ms (13.8% of total)

ival-pow: 8.0ms (12.3% of total)

ival-pow2: 3.0ms (4.6% of total)

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

exact: 0.0ms (0% of total)

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

bsearch73.0ms (0.4%)

Memory

29.7MiB live, 139.6MiB allocated

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.8039940652619246e+202	6.8013435092528095e+205
2.0ms	-1.3988323809623276e-295	3.343014242256829e-303
63.0ms	-6.276935938721731e-137	-6.7085674881083814e-152

Samples

28.0ms	160×	0	valid
24.0ms	136×	0	invalid

Compiler

Compiled 1 316 to 1 122 computations (14.7% saved)

Precisions

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

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

ival-pow: 11.0ms (28.3% of total)

ival-mult: 10.0ms (25.7% of total)

ival-pow2: 3.0ms (7.7% of total)

ival-sub: 1.0ms (2.6% of total)

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

exact: 0.0ms (0% of total)

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

bsearch37.0ms (0.2%)

Memory

-24.2MiB live, 61.6MiB allocated

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.8039940652619246e+202	6.8013435092528095e+205
2.0ms	-1.3988323809623276e-295	3.343014242256829e-303
30.0ms	-3.0735892676257658e+106	-1.6657846485504316e+101

Samples

12.0ms	64×	0	valid
9.0ms	61×	0	invalid

Compiler

Compiled 1 274 to 1 104 computations (13.3% saved)

Precisions

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

ival-div: 5.0ms (30.8% of total)

ival-pow: 5.0ms (30.8% of total)

ival-mult: 4.0ms (24.6% of total)

ival-sub: 1.0ms (6.2% of total)

ival-pow2: 1.0ms (6.2% of total)

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

exact: 0.0ms (0% of total)

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

bsearch22.0ms (0.1%)

Memory

9.1MiB live, 46.9MiB allocated

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.8039940652619246e+202	6.8013435092528095e+205
2.0ms	-1.3988323809623276e-295	3.343014242256829e-303
16.0ms	-6.276935938721731e-137	-6.7085674881083814e-152

Samples

7.0ms	32×	0	valid
5.0ms	37×	0	invalid

Compiler

Compiled 1 296 to 1 102 computations (15% saved)

Precisions

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

ival-pow2: 3.0ms (30.1% of total)

ival-div: 2.0ms (20.1% of total)

ival-mult: 2.0ms (20.1% of total)

ival-pow: 2.0ms (20.1% of total)

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

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

exact: 0.0ms (0% of total)

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

bsearch63.0ms (0.3%)

Memory

-0.2MiB live, 122.6MiB allocated

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.8039940652619246e+202	6.8013435092528095e+205
2.0ms	-1.3988323809623276e-295	3.343014242256829e-303
54.0ms	-2.180807715741583e-217	-5.965427935061001e-222

Samples

23.0ms	131×	0	invalid
22.0ms	128×	0	valid

Compiler

Compiled 1 196 to 1 030 computations (13.9% saved)

Precisions

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

ival-div: 14.0ms (39.6% of total)

ival-mult: 8.0ms (22.6% of total)

ival-pow: 8.0ms (22.6% of total)

ival-pow2: 3.0ms (8.5% of total)

ival-sub: 1.0ms (2.8% of total)

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

exact: 0.0ms (0% of total)

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

bsearch3.0ms (0%)

Memory

9.0MiB live, 9.0MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.8039940652619246e+202	6.8013435092528095e+205
2.0ms	-1.3988323809623276e-295	3.343014242256829e-303

Compiler

Compiled 736 to 682 computations (7.3% saved)

bsearch91.0ms (0.4%)

Memory

-60.5MiB live, 127.9MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
32.0ms	4.2305796285678633e-128	7.420457962465621e-128
49.0ms	-1.5699602328928542e-198	-5.425904837400917e-205

Samples

45.0ms	208×	0	valid
23.0ms	178×	0	invalid

Compiler

Compiled 317 to 378 computations (-19.2% saved)

Precisions

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

ival-div: 25.0ms (47% of total)

ival-mult: 12.0ms (22.6% of total)

ival-pow: 9.0ms (16.9% of total)

ival-pow2: 4.0ms (7.5% of total)

ival-sub: 2.0ms (3.8% of total)

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

exact: 0.0ms (0% of total)

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

bsearch48.0ms (0.2%)

Memory

3.9MiB live, 81.3MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	4.2305796285678633e-128	7.420457962465621e-128
40.0ms	-2.862934228800679e-52	-5.03892494860646e-54

Samples

18.0ms	112×	0	valid
14.0ms	108×	0	invalid

Compiler

Compiled 250 to 301 computations (-20.4% saved)

Precisions

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

ival-div: 8.0ms (34% of total)

ival-mult: 7.0ms (29.8% of total)

ival-pow: 5.0ms (21.3% of total)

ival-pow2: 2.0ms (8.5% of total)

ival-sub: 1.0ms (4.3% of total)

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

exact: 0.0ms (0% of total)

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

bsearch2.0ms (0%)

Memory

5.3MiB live, 5.3MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
0.0ms	4.2305796285678633e-128	7.420457962465621e-128
1.0ms	-2.862934228800679e-52	-5.03892494860646e-54

Compiler

Compiled 250 to 301 computations (-20.4% saved)

bsearch125.0ms (0.6%)

Memory

-7.3MiB live, 152.6MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
74.0ms	6.04152506499715e-197	6.210144801396041e-187
25.0ms	-3.0844162345600507e+150	-1.8636167721361652e+150

Samples

49.0ms	224×	0	valid
34.0ms	231×	0	invalid

Compiler

Compiled 294 to 366 computations (-24.5% saved)

Precisions

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

ival-mult: 17.0ms (31.4% of total)

ival-div: 16.0ms (29.5% of total)

ival-pow: 14.0ms (25.8% of total)

ival-pow2: 5.0ms (9.2% of total)

ival-sub: 2.0ms (3.7% of total)

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

exact: 0.0ms (0% of total)

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

bsearch1.0ms (0%)

Memory

2.5MiB live, 2.6MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	4.2305796285678633e-128	7.420457962465621e-128

Compiler

Compiled 110 to 126 computations (-14.5% saved)

bsearch1.0ms (0%)

Memory

3.4MiB live, 3.4MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	6.04152506499715e-197	6.210144801396041e-187

Compiler

Compiled 208 to 260 computations (-25% saved)

simplify58.0ms (0.3%)

Memory

15.2MiB live, 94.5MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	279	3129
1	359	3129
2	384	3129
3	411	3129
4	440	3129
5	469	3129
6	489	3129
7	497	3129
8	499	3129

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 d #s(literal -891101683129335/71288134650346800291268306339067051951456695425758748915299883092176174487635584164154887676833928121541286087087412614229511011271491218722697833120659596691437416786879139845044909253853184 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (if (<=.f64 d #s(literal -3679554895086869/3016028602530220424421062271578867838525126125874252890898307532480811172246863646685486789069132871854112712507200418582406770249989531589552959798883475511096677545853948017425342019529539590198394174553047792145043723038206885734470238620775335376572758801465612196212014773714996912064944617579072807182486470656 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (if (<=.f64 d #s(literal 7201440561641447/138489241570027830339787760577155329299276713436413040296712132107088403511830081562061637127414005863461524601112396740396934118638271997477005289970188832449072118890235188784327954969769132963403984511490113773016980728775065400466052716630386010092873601750856629835792384 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))))))
(if (<=.f64 l #s(literal -305000000000000001753476949329394967192097482330043569276197057955402596046020397710848010812565038053739468462777282256597639330642526208 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (/.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))))
(if (<=.f64 l #s(literal -305000000000000001753476949329394967192097482330043569276197057955402596046020397710848010812565038053739468462777282256597639330642526208 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (/.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))))
(if (<=.f64 l #s(literal -339999999999999986376532416695352406158760221333353982909010953767428259171258095694743275951751851867947440137346446312070035877255970816 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))) (sqrt.f64 (/.f64 d l))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))))
(if (<=.f64 h #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l))))
(if (<=.f64 l #s(literal 6773422405034819/436994993873214129706097166956708350993678881411295357199729151951767944417616335439228580716318181998128654620651240845861768505204366709906692902245553277900892247131030458103436298545516643924637451297481464347472084863384057367177715867713536 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l))))
(if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 8599999999999999637439835046266728119295747388815350846489070400700738695096444360759772477504341102995862342140745237627187845136384 binary64)) (.f64 (/.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))))
(if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 619999999999999988381661387597046500615963335203770614922936246306523776852955452971197700486771752940625998085529646212721281452387805892521595466782129033104699478891988941823506780676996202496 binary64)) (.f64 (/.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal 459827559900483/540973599882921212264795939754513005075299661860988438659031766043314076218086256101803270028960960404146580473095299767175523900930749990144551913946050126754187964414981206188781074100660675638296814498008256925847580971777599220570518424337445351925287506839283710296064 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal 459827559900483/540973599882921212264795939754513005075299661860988438659031766043314076218086256101803270028960960404146580473095299767175523900930749990144551913946050126754187964414981206188781074100660675638296814498008256925847580971777599220570518424337445351925287506839283710296064 binary64)) (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -235000000000000008407355427704233427496865425256453564228207238688417620235360987941442446300956384559104 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 7193966478911707/163499238157084246970890052651977815332245607254872681799888670100456398181905536269103756533156716633238933245476249210386222120009203192687752953715493389952614864728152938620316690140722215910002962984513038253533659992483501702257775023591263777382983344691261934931342007929269781293292322816 binary64)) (.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -235000000000000008407355427704233427496865425256453564228207238688417620235360987941442446300956384559104 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -1610733048836635/11505236063118821809467553221049758295155052665230762065499525194094891251552061640493342548634082305351687288311769174890162545204122663839542235560926343960177145179191391057683342054479750023644997308933440369205641643669917624414330439074612943178454432683813523087356623740062701843509462805095950344781824 binary64)) (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -1499999999999999903408865346644674673247483061533619996637975112429525498213187755309954815155595378688 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -1610733048836635/11505236063118821809467553221049758295155052665230762065499525194094891251552061640493342548634082305351687288311769174890162545204122663839542235560926343960177145179191391057683342054479750023644997308933440369205641643669917624414330439074612943178454432683813523087356623740062701843509462805095950344781824 binary64)) (.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -4290498537581631/26815615859885194199148049996411692254958731641184786755447122887443528060147093953603748596333806855380063716372972101707507765623893139892867298012168192 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -779999999999999969665539436646696516303981117870316002269993090357261956689416708487556384382244618240 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -3620108141084501/26815615859885194199148049996411692254958731641184786755447122887443528060147093953603748596333806855380063716372972101707507765623893139892867298012168192 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -8648395184246637/50872912848509630386961759877939283730657641008879914553804457182037637617627197811290223700497087789481581959483591006819830334885554237978846405428549423569451580654251209705071092879576217840034217957579701248029256805705844583825408 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -6463654995822641/10772758326371068942829547280138503507047095916181860064252479289484763452000421523688789066296501148112861120217452989876263797248376430311685764650295051980708298078471054537096527376147092924971608579554880258048 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 d #s(literal 8389699228974229/195109284394749514461349826862072894109287383916560696928697309976585733676235351257519131441468248197489183195087913930965498479955517831643136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -8799726592157969/1725436586697640946858688965569256363112777243042596638790631055949824 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (if (<=.f64 d #s(literal 8389699228974229/195109284394749514461349826862072894109287383916560696928697309976585733676235351257519131441468248197489183195087913930965498479955517831643136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -8799726592157969/1725436586697640946858688965569256363112777243042596638790631055949824 binary64)) (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal 8389699228974229/195109284394749514461349826862072894109287383916560696928697309976585733676235351257519131441468248197489183195087913930965498479955517831643136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -3000000000000000124216469591213846409050312014092089967683834602291815406983585544088716834198144287435868859239419406512331498560169695228350527700992 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (.f64 (/.f64 d l) (/.f64 d h)))) (if (<=.f64 l #s(literal 662777123595095/10520271803096747014481979765760257331100679605646347718996561806137464308594161644227333072555176902453965937712356435426038864500367607726255629541303761699910447342256889196383327515768645434542586503471562752 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal 8389699228974229/195109284394749514461349826862072894109287383916560696928697309976585733676235351257519131441468248197489183195087913930965498479955517831643136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 662777123595095/10520271803096747014481979765760257331100679605646347718996561806137464308594161644227333072555176902453965937712356435426038864500367607726255629541303761699910447342256889196383327515768645434542586503471562752 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

Outputs
(if (<=.f64 d #s(literal -891101683129335/71288134650346800291268306339067051951456695425758748915299883092176174487635584164154887676833928121541286087087412614229511011271491218722697833120659596691437416786879139845044909253853184 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (if (<=.f64 d #s(literal -3679554895086869/3016028602530220424421062271578867838525126125874252890898307532480811172246863646685486789069132871854112712507200418582406770249989531589552959798883475511096677545853948017425342019529539590198394174553047792145043723038206885734470238620775335376572758801465612196212014773714996912064944617579072807182486470656 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (if (<=.f64 d #s(literal 7201440561641447/138489241570027830339787760577155329299276713436413040296712132107088403511830081562061637127414005863461524601112396740396934118638271997477005289970188832449072118890235188784327954969769132963403984511490113773016980728775065400466052716630386010092873601750856629835792384 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))))))
(if (<=.f64 d #s(literal -891101683129335/71288134650346800291268306339067051951456695425758748915299883092176174487635584164154887676833928121541286087087412614229511011271491218722697833120659596691437416786879139845044909253853184 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 h #s(literal -1 binary64))) (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l))) (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -3679554895086869/3016028602530220424421062271578867838525126125874252890898307532480811172246863646685486789069132871854112712507200418582406770249989531589552959798883475511096677545853948017425342019529539590198394174553047792145043723038206885734470238620775335376572758801465612196212014773714996912064944617579072807182486470656 binary64)) (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (.f64 #s(literal -1/2 binary64) (/.f64 h l))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)))) (if (<=.f64 d #s(literal 7201440561641447/138489241570027830339787760577155329299276713436413040296712132107088403511830081562061637127414005863461524601112396740396934118638271997477005289970188832449072118890235188784327954969769132963403984511490113773016980728775065400466052716630386010092873601750856629835792384 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 h #s(literal -1 binary64))) (/.f64 (.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) l)))))))
(if (<=.f64 l #s(literal -305000000000000001753476949329394967192097482330043569276197057955402596046020397710848010812565038053739468462777282256597639330642526208 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (/.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))))
(if (<=.f64 l #s(literal -305000000000000001753476949329394967192097482330043569276197057955402596046020397710848010812565038053739468462777282256597639330642526208 binary64)) (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (.f64 #s(literal -1/2 binary64) (/.f64 h l))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (.f64 #s(literal -1/2 binary64) (/.f64 h l))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 h #s(literal -1 binary64))) (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l))))))
(if (<=.f64 l #s(literal -305000000000000001753476949329394967192097482330043569276197057955402596046020397710848010812565038053739468462777282256597639330642526208 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (/.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))))
(if (<=.f64 l #s(literal -305000000000000001753476949329394967192097482330043569276197057955402596046020397710848010812565038053739468462777282256597639330642526208 binary64)) (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (.f64 #s(literal -1/2 binary64) (/.f64 h l))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (.f64 #s(literal -1/2 binary64) (/.f64 h l))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (fma.f64 (.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (.f64 #s(literal -1/2 binary64) (/.f64 h l))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))))
(if (<=.f64 l #s(literal -339999999999999986376532416695352406158760221333353982909010953767428259171258095694743275951751851867947440137346446312070035877255970816 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))) (sqrt.f64 (/.f64 d l))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))))
(if (<=.f64 l #s(literal -339999999999999986376532416695352406158760221333353982909010953767428259171258095694743275951751851867947440137346446312070035877255970816 binary64)) (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (.f64 #s(literal -1/2 binary64) (/.f64 h l))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (.f64 #s(literal -1/2 binary64) (/.f64 h l))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))) (sqrt.f64 (/.f64 d l))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (fma.f64 (.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (.f64 #s(literal -1/2 binary64) (/.f64 h l))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))))
(if (<=.f64 h #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l))))
(if (<=.f64 h #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (.f64 #s(literal -1/2 binary64) (/.f64 h l))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (fma.f64 (.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (.f64 #s(literal -1/2 binary64) (/.f64 h l))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))))
(if (<=.f64 l #s(literal 6773422405034819/436994993873214129706097166956708350993678881411295357199729151951767944417616335439228580716318181998128654620651240845861768505204366709906692902245553277900892247131030458103436298545516643924637451297481464347472084863384057367177715867713536 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l))))
(if (<=.f64 l #s(literal 6773422405034819/436994993873214129706097166956708350993678881411295357199729151951767944417616335439228580716318181998128654620651240845861768505204366709906692902245553277900892247131030458103436298545516643924637451297481464347472084863384057367177715867713536 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (fma.f64 (.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (.f64 #s(literal -1/2 binary64) (/.f64 h l))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))))
(if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 8599999999999999637439835046266728119295747388815350846489070400700738695096444360759772477504341102995862342140745237627187845136384 binary64)) (.f64 (/.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D)) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))))
(if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 8599999999999999637439835046266728119295747388815350846489070400700738695096444360759772477504341102995862342140745237627187845136384 binary64)) (.f64 (/.f64 (.f64 (sqrt.f64 d) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 l)) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) (.f64 #s(literal -1/2 binary64) (/.f64 h l))) (.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64))))))
(if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 619999999999999988381661387597046500615963335203770614922936246306523776852955452971197700486771752940625998085529646212721281452387805892521595466782129033104699478891988941823506780676996202496 binary64)) (.f64 (/.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 619999999999999988381661387597046500615963335203770614922936246306523776852955452971197700486771752940625998085529646212721281452387805892521595466782129033104699478891988941823506780676996202496 binary64)) (.f64 (/.f64 (.f64 (sqrt.f64 d) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal 459827559900483/540973599882921212264795939754513005075299661860988438659031766043314076218086256101803270028960960404146580473095299767175523900930749990144551913946050126754187964414981206188781074100660675638296814498008256925847580971777599220570518424337445351925287506839283710296064 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal 459827559900483/540973599882921212264795939754513005075299661860988438659031766043314076218086256101803270028960960404146580473095299767175523900930749990144551913946050126754187964414981206188781074100660675638296814498008256925847580971777599220570518424337445351925287506839283710296064 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal 459827559900483/540973599882921212264795939754513005075299661860988438659031766043314076218086256101803270028960960404146580473095299767175523900930749990144551913946050126754187964414981206188781074100660675638296814498008256925847580971777599220570518424337445351925287506839283710296064 binary64)) (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal 459827559900483/540973599882921212264795939754513005075299661860988438659031766043314076218086256101803270028960960404146580473095299767175523900930749990144551913946050126754187964414981206188781074100660675638296814498008256925847580971777599220570518424337445351925287506839283710296064 binary64)) (.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 (.f64 M D) #s(literal -1/4 binary64)) l) (/.f64 h d))) (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -235000000000000008407355427704233427496865425256453564228207238688417620235360987941442446300956384559104 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 7193966478911707/163499238157084246970890052651977815332245607254872681799888670100456398181905536269103756533156716633238933245476249210386222120009203192687752953715493389952614864728152938620316690140722215910002962984513038253533659992483501702257775023591263777382983344691261934931342007929269781293292322816 binary64)) (.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) (.f64 D (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -235000000000000008407355427704233427496865425256453564228207238688417620235360987941442446300956384559104 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 7193966478911707/163499238157084246970890052651977815332245607254872681799888670100456398181905536269103756533156716633238933245476249210386222120009203192687752953715493389952614864728152938620316690140722215910002962984513038253533659992483501702257775023591263777382983344691261934931342007929269781293292322816 binary64)) (.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)) (fma.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 M (/.f64 #s(literal 1/2 binary64) d))) D) #s(literal 1 binary64))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -235000000000000008407355427704233427496865425256453564228207238688417620235360987941442446300956384559104 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -1610733048836635/11505236063118821809467553221049758295155052665230762065499525194094891251552061640493342548634082305351687288311769174890162545204122663839542235560926343960177145179191391057683342054479750023644997308933440369205641643669917624414330439074612943178454432683813523087356623740062701843509462805095950344781824 binary64)) (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -235000000000000008407355427704233427496865425256453564228207238688417620235360987941442446300956384559104 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -1610733048836635/11505236063118821809467553221049758295155052665230762065499525194094891251552061640493342548634082305351687288311769174890162545204122663839542235560926343960177145179191391057683342054479750023644997308933440369205641643669917624414330439074612943178454432683813523087356623740062701843509462805095950344781824 binary64)) (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 M (/.f64 #s(literal 1/2 binary64) d))) (/.f64 #s(literal 1/2 binary64) d)) M) D #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -1499999999999999903408865346644674673247483061533619996637975112429525498213187755309954815155595378688 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -1610733048836635/11505236063118821809467553221049758295155052665230762065499525194094891251552061640493342548634082305351687288311769174890162545204122663839542235560926343960177145179191391057683342054479750023644997308933440369205641643669917624414330439074612943178454432683813523087356623740062701843509462805095950344781824 binary64)) (.f64 (fma.f64 M (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 (/.f64 #s(literal 1/2 binary64) d) M))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -1499999999999999903408865346644674673247483061533619996637975112429525498213187755309954815155595378688 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -1610733048836635/11505236063118821809467553221049758295155052665230762065499525194094891251552061640493342548634082305351687288311769174890162545204122663839542235560926343960177145179191391057683342054479750023644997308933440369205641643669917624414330439074612943178454432683813523087356623740062701843509462805095950344781824 binary64)) (.f64 (fma.f64 M (.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) D) (.f64 M (/.f64 #s(literal 1/2 binary64) d))) (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -4290498537581631/26815615859885194199148049996411692254958731641184786755447122887443528060147093953603748596333806855380063716372972101707507765623893139892867298012168192 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -4290498537581631/26815615859885194199148049996411692254958731641184786755447122887443528060147093953603748596333806855380063716372972101707507765623893139892867298012168192 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 M M) h)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -779999999999999969665539436646696516303981117870316002269993090357261956689416708487556384382244618240 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l) (/.f64 (/.f64 (.f64 D D) d) d)) #s(literal 1 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -779999999999999969665539436646696516303981117870316002269993090357261956689416708487556384382244618240 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (fma.f64 (neg.f64 h) (.f64 (/.f64 (/.f64 (.f64 D D) d) d) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) l)) #s(literal 1 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -3620108141084501/26815615859885194199148049996411692254958731641184786755447122887443528060147093953603748596333806855380063716372972101707507765623893139892867298012168192 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 h (.f64 M M)) #s(literal -1/8 binary64)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -3620108141084501/26815615859885194199148049996411692254958731641184786755447122887443528060147093953603748596333806855380063716372972101707507765623893139892867298012168192 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 M M) h)) d) (/.f64 (.f64 D D) d) l) l)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -8648395184246637/50872912848509630386961759877939283730657641008879914553804457182037637617627197811290223700497087789481581959483591006819830334885554237978846405428549423569451580654251209705071092879576217840034217957579701248029256805705844583825408 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (/.f64 (.f64 D D) l))) (/.f64 (/.f64 (.f64 M M) d) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -8648395184246637/50872912848509630386961759877939283730657641008879914553804457182037637617627197811290223700497087789481581959483591006819830334885554237978846405428549423569451580654251209705071092879576217840034217957579701248029256805705844583825408 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (+ ( (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) (.f64 (.f64 (/.f64 (.f64 D D) l) h) #s(literal -1/8 binary64)))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(approx ( (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (.f64 (/.f64 h d) #s(literal -1/4 binary64)) (/.f64 (.f64 D M) l))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 58000000000000002968708844466594531928510667981887687248462335822048439840842071044348124928924908446198223749265184924397699825491599928054440765703248172632550391238913794170222712237231847257655992123392 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (.f64 (.f64 M (/.f64 #s(literal 1/2 binary64) d)) D) #s(approx (* (* (/ h l) -1/2) (* (* M (/ 1/2 d)) D)) (.f64 (/.f64 (.f64 M D) l) (.f64 #s(literal -1/4 binary64) (/.f64 h d)))) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -6463654995822641/10772758326371068942829547280138503507047095916181860064252479289484763452000421523688789066296501148112861120217452989876263797248376430311685764650295051980708298078471054537096527376147092924971608579554880258048 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 d #s(literal 8389699228974229/195109284394749514461349826862072894109287383916560696928697309976585733676235351257519131441468248197489183195087913930965498479955517831643136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -6463654995822641/10772758326371068942829547280138503507047095916181860064252479289484763452000421523688789066296501148112861120217452989876263797248376430311685764650295051980708298078471054537096527376147092924971608579554880258048 binary64)) (/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 d #s(literal 8389699228974229/195109284394749514461349826862072894109287383916560696928697309976585733676235351257519131441468248197489183195087913930965498479955517831643136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -8799726592157969/1725436586697640946858688965569256363112777243042596638790631055949824 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (if (<=.f64 d #s(literal 8389699228974229/195109284394749514461349826862072894109287383916560696928697309976585733676235351257519131441468248197489183195087913930965498479955517831643136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -8799726592157969/1725436586697640946858688965569256363112777243042596638790631055949824 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (if (<=.f64 d #s(literal 8389699228974229/195109284394749514461349826862072894109287383916560696928697309976585733676235351257519131441468248197489183195087913930965498479955517831643136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -8799726592157969/1725436586697640946858688965569256363112777243042596638790631055949824 binary64)) (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal 8389699228974229/195109284394749514461349826862072894109287383916560696928697309976585733676235351257519131441468248197489183195087913930965498479955517831643136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -8799726592157969/1725436586697640946858688965569256363112777243042596638790631055949824 binary64)) (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal 8389699228974229/195109284394749514461349826862072894109287383916560696928697309976585733676235351257519131441468248197489183195087913930965498479955517831643136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -3000000000000000124216469591213846409050312014092089967683834602291815406983585544088716834198144287435868859239419406512331498560169695228350527700992 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (.f64 (/.f64 d l) (/.f64 d h)))) (if (<=.f64 l #s(literal 662777123595095/10520271803096747014481979765760257331100679605646347718996561806137464308594161644227333072555176902453965937712356435426038864500367607726255629541303761699910447342256889196383327515768645434542586503471562752 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -3000000000000000124216469591213846409050312014092089967683834602291815406983585544088716834198144287435868859239419406512331498560169695228350527700992 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (.f64 (/.f64 d h) (/.f64 d l)))) (if (<=.f64 l #s(literal 662777123595095/10520271803096747014481979765760257331100679605646347718996561806137464308594161644227333072555176902453965937712356435426038864500367607726255629541303761699910447342256889196383327515768645434542586503471562752 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal 8389699228974229/195109284394749514461349826862072894109287383916560696928697309976585733676235351257519131441468248197489183195087913930965498479955517831643136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal 8389699228974229/195109284394749514461349826862072894109287383916560696928697309976585733676235351257519131441468248197489183195087913930965498479955517831643136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 662777123595095/10520271803096747014481979765760257331100679605646347718996561806137464308594161644227333072555176902453965937712356435426038864500367607726255629541303761699910447342256889196383327515768645434542586503471562752 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(if (<=.f64 l #s(literal 662777123595095/10520271803096747014481979765760257331100679605646347718996561806137464308594161644227333072555176902453965937712356435426038864500367607726255629541303761699910447342256889196383327515768645434542586503471562752 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

soundness2.2s (10.8%)

Memory

9.6MiB live, 1 442.2MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	68	288
0	108	281
1	327	263
2	2141	255
0	8265	255
0	379	14661
1	1112	14207
2	4003	14120
0	8113	13820
0	147	3819
1	413	3735
2	1498	3698
3	4176	3682
4	7950	3682
0	8172	3598
0	91	520
0	144	530
1	446	492
2	3114	465
0	8540	455
0	334	19064
1	985	18302
2	3369	18185
3	7516	18110
0	8013	17780
0	78	450
0	129	444
1	429	380
2	2777	366
0	8339	366
0	22	72
0	38	68
1	124	67
2	828	67
0	8730	65

Stop Event

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

Compiler

Compiled 4 914 to 2 518 computations (48.8% saved)

preprocess248.0ms (1.2%)

Memory: 17.8MiB live, 450.1MiB allocated
Compiler: Compiled 4 706 to 944 computations (79.9% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated